perl能否匹配了就打印上一行
作者: ooooldman 发布时间: 2011-06-10
把上一行存在一个变量里
作者: dgtnk 发布时间: 2011-06-10
有位喜欢 awk 的帅哥肯定会这么写
perl -ne "BEGIN{$b = ''} print $b if /sth/; $b = $_" file
perl -ne "BEGIN{$b = ''} print $b if /sth/; $b = $_" file
作者: zhlong8 发布时间: 2011-06-10
perl -ne 'while ($_=~/pattern/g) {print $b}{$b=$_}'
作者: yinyuemi 发布时间: 2011-06-10