perl -e '$foo="bar";print $foo'
##</code><code>##

#!/usr/bin/perl -s
print $foo;

#then in the command line
#file.pl -foo=bar