moo@cow~>perl -le 'print $argv[0] || "NONE 4 U"' OHAI
NONE 4 U
moo@cow~>perl -le 'print $ARGV[0] || "NONE 4 U"' OHAI
OHAI