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

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