$ perl -le " print scalar nekkid "
nekkid

$ perl -le " sub nekkid { localtime } print scalar nekkid "
Tue Jun 28 01:13:12 2011

$ perl -le " print-nekkid "
-nekkid

$ perl -le " sub nekkid { localtime } print-nekkid "
Ambiguous use of -nekkid resolved as -&nekkid() at -e line 1.
-Tue Jun 28 01:05:22 2011