如何打印行號10和行25之間的行？

我有一個文本文件。如何使用Perl在第10行和第25行之間打印所有內容？如何打印行號10和行25之間的行？

2015-01-06 chris202

不知道爲什麼這是封閉的「不清楚」;它的問題可以清楚地表達出來。我當然可以理解，由於缺乏研究努力而不願意結束。投票重新開放。 – ThisSuitIsBlackNot

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 
'

來源

2015-01-06 16:31:55 ikegami

爲什麼Perl使用'$ .'作爲默認變量而不是'$ _'？ –

@RenéNyffenegger$。不是默認變量，而是獲取當前行數的變量，請參見''perldoc perlvar' –

@René從['perldoc perlop']（http://perldoc.perl.org/perlop.html#Range-Operators）：「如果標量'..'的任一操作數是一個常量表達式，那麼如果該操作數與當前輸入行號（'$ .'變量）相等（'=='），則認爲該操作數爲真。」 – ThisSuitIsBlackNot

另一種方式來做到這一點是（如果使用* nix）

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

來源

2015-01-06 16:41:53 sam

嗯。不是非常非常的好， –

也不是可移植的* nix。 – tjd

如何打印行號10和行25之間的行？

回答

相關問題