Select Code to Download

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

...

print "$page\n";
print end_html;

    $locat = "www.nsn.org/elghome/material_office2.htm";
    open (HTMLP,$locat);
...
         $pageht .= $_;
    }
    close(HTMLP);

    <hr>
    <p>$pageht
    <hr>