相当于php-E的perl命令行

有可能吗？

这应该是您想要的：

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

---

您可以使用

END{…}

块添加应在循环后执行的代码：

perl -nle 'END { print $. }'  notes.txt

如果您想让它更独立，也可以轻松地将其放入自己的

-e

参数中：

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

另见：

• 在

TIMTOWTDI

您可以使用运算符：

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

这个操作员没有想象中那么神奇，如果我们拆下一条班轮：

perl -nwE '}{ say $.' somefile 

如果有多个文件，则会为每个文件打印一个累计总和

perl -nwE 'eof and say $.' somefile

您可以关闭文件句柄以获取非累积计数：

perl -nwE 'eof and say $.' somefile somefile somefile
10
20
30

---

啊，就是这样。谢谢谢谢你的邀请。我也不知道。@Zaid这是个好把戏，谢谢分享。我刚刚意识到，它实际上不会与

-p

开关一起工作，就像我链接到-only

-n

的问题中所说的那样。使用

-p

它将变成

，而（）{（）；}{code}继续{print}

。你是唯一理解这个问题的人。谢谢

perl -nwE 'eof and say $.' somefile

perl -nwE 'eof and say $.' somefile somefile somefile
10
20
30

perl -nwE 'if (eof) { say $.; close ARGV }' somefile somefile somefile
10
10
10