系统命令"grep search_str -B3 filename" 中“-B3”的功能如何用perl中的grep命令实现?

或者用perl有没有什么方便的方法实现提取所有“包括关键字的前几行”?

如果用逻辑去实现的话,那就打开filename文件,以行为单位遍历文本,用正则search_str进行过滤,如果符合要求,再进一步用substr(string,0,3),最后print输出


其实还有一个简单方法就是perl直接调用控制台命令

 @result = `grep search_str -B3 filename`;

温馨提示:答案为网友推荐,仅供参考
相似回答
大家正在搜