#!/usr/bin/perl -s
if ($foo eq 'bar'){ print "true\n" }

##</code><code>##

mojodaddy@muchomojo:~$ perl foo_eq_bar.pl -foo=bar

##</code><code>##

#!/usr/bin/perl -s
if ($foo){ print "true\n" }

##</code><code>##

#!/usr/bin/perl -s
if ($foo eq 'bar'){ print "true\n" }
if ($foo){ print "woo\n" }
print "woo-hoo\n" if $foo eq 'bar';
print "woopty-doo\n" if $foo;