>perl -le"print $0"
-e

>perl -lE"print $0"
-e