请问怎样取出某个特定字符串的行及从它开始的倒数第二行.

blackold

输出太多了。
sed -n 'N;/abcd$/p;D' urfile
有时不必是多多益善啊。

[ 本帖最后由 blackold 于 2009-8-13 09:47 编辑 ]

ly5066113

黑哥今天有点不在状态啊。

sed -n 'N;/abcd$/p;D' urfile
这个更不符合题意呀。

blackold

不知道为什么我的分涨得这么快。
奖励积分之前只是两万多，现在多了一万，奖励积分也没有一万啊。

wtuter

呵呵，没仔细看，只看输出结果来着

blackold

晕，真是没看懂题意啊。

ly5066113

人气旺啊！黑哥富人榜已经排名第二了。

blackold

可能是系统错误造成的。

skyning

上午因为忙其他事情，就没来跟帖子。

试过了，确实局限很大。

原帖由 Minsic 于 2009-8-13 09:04 发表
用你的文件代替就是了，不过这个方法不好，局限性太大，顶楼的文本稍微变化下就不合要求了：比如你把第一行去掉看看

cxfcxf

#!/usr/bin/perl

use strict;
use warnings;

my @array = <DATA>;
chomp@array;

my $count = 0;
foreach(@array) {
    if (/abcd/) {
       if ($count-2 > 0) {
            print "$array[$count-2]\n";
            print "$_\n";
       }
    }
    $count++;
}

__DATA__
1 abcd
2 aa
3 ee
4 bb
5 cc
6 abcd
7 bb
8 ee
9 ff
10 abcd

这个算不算shell啊

chinaglwo

原帖由 ly5066113 于 2009-8-13 09:34 发表


sed '1N;$!N;/abcd$/{h;s/\n.*\n/\n/p;x};D' urfile

能不能详细讲一下每读一行是怎么处理的，我看了好久没看懂，又去查了man，越看越糊涂了。