Select Code to Download

"Prototype mismatch: sub main::head ($) vs none"

  
use LWP::Simple qw(!head);
use CGI qw(:standard);    # then only CGI.pm defines a head

LWP::Simple::head($url)

#!/usr/bin/perl 

...
    my $content = get($geturl);
    print "test\n";
}