Changeset 2333

Show
Ignore:
Timestamp:
09/03/07 23:53:30
Author:
miyagawa
Message:

fix Term::Readline usage

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Web-Scraper/trunk/bin/scraper

    r2328 r2333  
    1717    or die "Usage: scraper [URI-or-filename]\n"; 
    1818 
    19 my $term    = Term::ReadLine->new(); 
     19my $term    = Term::ReadLine->new("Web::Scraper"); 
    2020my $scraper = scraper { run_loop($_[0], $term) }; 
    2121my $result  = $scraper->scrape($stuff);