$ perl -MO=Deparse -le 'print 1' BEGIN { $/ = "\n"; $\ = "\n"; } print 1; -e syntax OK $ perl -MO=Deparse -ne 'print 1' LINE: while (defined($_ = <ARGV>)) { print 1; } -e syntax OK
This shows how to get the semantics of -l and -n.
In reply to Re: Setting -l for a block
by moritz
in thread Setting -l for a block
by rovf
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |