Pleac Perl : 打印一段范围内的文本

见 : Pleac Perl -Pattern Matching

#打印第15到第17行
perl -ne 'print if 15 .. 17' datafile

＃打印<xml>...</xml>
while (<>) {
    print if m#<XMP>#i .. m#</XMP>#i;
}