Select Code to Download

while(<PAGES>) {
    push(@pages, $_);  #semi colon added
    }

use Carp;
use diagnostics;

Scalar value @filenames[$i] better written as $filenames[$i] at xx.pl 
+line 71 (#1)
    (W syntax) You've used an array slice (indicated by @) to select a
...
Global symbol "@pages" requires explicit package name at xx.pl line 11
+.
Global symbol "@filenames" requires explicit package name at xx.pl lin
+e 12.
Global symbol "@titles" requires explicit package name at xx.pl line 1
+3.