Select Code to Download

#!/usr/bin/perl

...
else {
    print "nothing special";
}

#!/usr/bin/perl -w

...

print "with arguments: ";
print get('http://localhost/cgi-bin/foo.cgi?foo=bar'), "\n";