$ perl -le'print for @ARGV' blah "a b c"
blah
a b c
 $ sudo perl -le'print for @ARGV' blah "a b c"
blah
a b c