$ perl -wl -e 'print "This is line 1";' \ -e 'print "This is line 2";' \ -e 'print "This is line 3";' \ -e 'print "This is line 4";' \ -e 'print "This is line 5";' #### while(<>) { print ; } #### $ perl -MO=Deparse -pe '1' LINE: while (defined($_ = )) { '???'; } continue { print $_; } -e syntax OK #### split; #### perl -01512 -e #### $ perl -01512 -e 1 Unrecognized switch: -2 (-h will show valid options). $