Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w 
 
...
for (1..273) { 
    `wget http://www.my-site.com/mydir/?Page=$_`; 
}

Select or download this

use LWP::Simple qw(mirror);
for (1..273) {
  mirror "http://www.my-site.com/mydir/?Page=$_", "file$_";
}