regex-如何在先前匹配的行上方进行行grep

我的日志文件只定期添加日期.我的日志文件如下所示：

Monday 2017
foo foo foo foo foo foo foo foo foo foo foo foo 
foo foo foo ALARM foo foo foo foo foo foo foo foo 
foo foo foo foo foo foo foo foo foo foo foo foo 
foo foo foo foo foo foo ALARM foo foo foo foo foo
foo foo foo foo foo foo foo foo foo foo foo foo

我正在编写一个类似这样的脚本：

grep 'ALARM' myfile.log | tail -1

我需要搜索上一个警报上方的上一个日期条目,并将其包括在我的结果中.我不知道在匹配的警报线上方会发生多少行.

所需的输出：

Monday 2017
foo foo foo foo foo foo ALARM foo foo foo foo foo

解决方法:

假设日期格式为2017年星期一

grep -E 'Monday 2017|ALARM' | grep -B1 'ALARM'

第二个grep是删除警报匹配之间的多个日期模式,

编辑：再次阅读问题,似乎只需要匹配警报的最后一行,我将使用以下perl一个衬里​​：

perl -ne 'if(/Monday 2017/){$last_date=$_}if(/ALARM/){$date=$last_date;$line=$_}END{print $date,$line}' <<END
Monday 2017
foo foo foo foo foo foo foo foo foo foo foo foo 
foo foo foo ALARM foo foo foo foo foo foo foo foo 
foo foo foo foo foo foo foo foo foo foo foo foo 
foo foo foo foo foo foo ALARM foo foo foo foo foo
foo foo foo foo foo foo foo foo foo foo foo foo
END