如何在行号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
'

Answer 2

另一种方法是（如果使用* nix）

my @lines = `head -25 filename | tail -15`