Help for this page

Select Code to Download


  1. or download this
    use lib "../lib4";

use URI;
use Web::Scraper;
  2. or download this
    use strict;
use Web::Scraper;
...

print "\nURL is:  " . $m->uri() . "\n";
for(my $a=0;$a<6;$a++){print $res->{t1}[$a] . "\t";}