perl - 如何打印行号 10 和 25 之间的行？

Question

我有一个文本文件。如何使用 Perl 打印第 10 行和第 25 行之间的所有内容？

Answer 1

perl -ne'print if 10..25'

这是

的缩写

perl -ne'print if $. == 10 .. $. == 25'

这是有效的

perl -ne'print if $. >= 10 && $. < 25'

可以优化到

perl -ne'
   next if $. < 10;
   last if $. > 25;
   print
'