Question

php -R '$count++' -E 'print "$count\n";' < somefile

will print the number of lines in ‘somefile’ (not that I would actually do this).

I’m looking to emulate the -E switch in a perl command.

perl -ne '$count++' -???? 'print "$count\n"' somefile

Is it possible?

Answer 1

You can use an END { ... } block to add code that should be executed after the loop:

perl -ne '$count++; END { print "$count\n"; }' somefile

You can also easily put it in its own -e argument, if you want it more separated:

perl -ne '$count++;' -e 'END { print "$count\n"; }' somefile

See also:

• perlmod – BEGIN, UNITCHECK, CHECK, INIT and END at perldoc.perl.org.