Select Code to Download

#!/path/to/perl
    use strict;
...
    die "Error $myurl\n ", $page->status_line, "\n Aborting" 
    unless $page->is_success; 
    print "Success", $page->content_type, " document!\n";