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