is equivalent to
perl -e ' while (<>) { $s=<>; <>; <>; do_something_with_$s} '
so 4 lines will be read each pass, but only the second line will be used for anything
Personally, I'd go with something like
perl -ne 'chomp; print length($_)."\n" if (/^@/);'
instead.
In reply to Re^4: command line perl reading from STDIN
by Anonymous Monk
in thread command line perl reading from STDIN
by perlhappy
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |