Select Code to Download

$ cat t.pl
#!/usr/bin/perl
print "foo=$foo\n";
$ perl t.pl -foo=bar
foo=

$ cat t.pl
#!/usr/bin/perl -s
print "foo=$foo\n";
$ perl -s t.pl -foo=bar
foo=bar

$ cat t.pl
#!/usr/bin/perl -s
print "foo=$foo\n";
$ perl t.pl -foo=bar
foo=1