Help for this page

Select Code to Download

Select or download this

Insecure $ENV{PATH} while running with -T switch at /usr/local/gnu/lib
+/perl5/Cwd.pm line 69.

Select or download this

#! /usr/local/bin/perl -Tw

...
    chomp $hostaddr;
    push(@HostFiles, $1) if ($hostaddr =~ /(hostlist\_\d{1,3}\.\d{1,3}
+\.\d{1,3})/);
}