双重匹配 - 如果前一行与另一个模式匹配，则替换后续行中的模式？

所以以下应该有效：

sed 'H;/BEGIN:VEVENT/h;/END:VEVENT/!d;x;/DTSTART:'"$(date +%Y%m%dT%H%M)"'/s/VEVENT/VTODO/g' org.ics

解释：

H：附加到创建缓冲区（空间）的保留空间，然后我们进行模式匹配

/BEGIN:VEVENT/h并将其存储在保留空间中，所以现在我们运行另一个模式匹配

/END:VEVENT/!d如果模式不匹配，则将其删除。

x;交换与模式空间保持空间，所以现在我们在模式空间中有我们需要的行

DTSTART... 最后，如果该行与日期匹配，则替换该行。sos/.../.../g仅当存在匹配时才执行。

/DTSTART:'"$(date +%Y%m%dT%H%M)"/s/VEVENT/VTODO/g

更新

sed '1n;H;/BEGIN:VEVENT/h;/END:VEVENT/!d;x;/DTSTART:'"$(date +%Y%m%dT193700)"'/s/VEVENT/VTODO/g' org.ics | sed '$aEND:CALENDAR

在每个 Unix 机器上的任何 shell 中稳健地使用任何 awk：

$ cat tst.sh
#!/usr/bin/env bash

awk -v now="$(date +'%Y%m%dT%H%M')" '
    $0 == "BEGIN:VEVENT" {
        eventType = 1
        event = $0
        next
    }
    eventType {
        event = event ORS $0
        if ( $0 == ("DTSTART:" now) ) {
            eventType = 2
        }
        if ( $0 == "END:VEVENT" ) {
            if ( eventType == 2 ) {
                sub(/^BEGIN:VEVENT/,"BEGIN:VTODO",event)
                sub(/END:VEVENT$/,"END:VTODO",event)
            }
            print event
        }
        next
    }
    { print }
' "${@:--}"

$ ./tst.sh file
BEGIN:VCALENDAR
BEGIN:VEVENT
DTSTART:20220340T140000
END:VEVENT
BEGIN:VTODO
DTSTART:20230620T193700
END:VTODO
BEGIN:VEVENT
DTSTART:20210210T193800
END:VEVENT

唯一失败的方法是，如果您的输入中可以有其他一些部分，其中可以包含与任何 BEGIN:、END: 或 DSTART: 行匹配的行，但我怀疑这在您的输入中是否有效 - 您如果是的话，必须向我们展示它是如何指定的。

上述解决方案的重要之处在于，它将整个文字行与目标字符串进行比较，而不仅仅是对输入中可能出现的位置进行部分匹配。

它不是解决问题，只是提示：

sed s/'$'/':'/ org.ics |awk 'BEGIN{RS="BEGIN";FS=":";CD="20220340"} NR>1 {AA[1]="BEGIN";for(i=2;i<=NF;i++){AA[i]=$i;if($i =="DTSTART" && $(i+1) ~ CD ){AA[2]="VTODO"}};for(i in AA){printf AA[i]":"};print ""}'

其中sed命令在每行末尾添加 : （冒号），RS="BEGIN"将 RowSeparator 设置为关键字 BEGIN （这就是它忽略的原因！），FS=":"将 FieldSeparator 设置为 ":" 。在每个“行”中（从关键字 BEGIN 到下一个 BEGIN，更好地说是“记录”），字段被复制到以 i=2 开头的数组成员中AA[i]，因为 AA[1] 必须是被忽略的 BEGIN。同时检查关键字 DTSTART 和当前日期，并在必要时将 VEVENT 更改为 VTODO。检查该行后，将打印数组 AA[]，并以 : 作为分隔符。

这只是提示，我没有测试过。你必须自己调试和调整。也就是说，如果不需要，您可以清除结尾 : 。

我们可以在TXR中有这样的解决方案：

@(repeat)
@  (cases)
BEGIN:VEVENT
DTSTART:@{date}T@{time}
END:VEVENT
@    (output)
BEGIN:VTODO
DTSTART:@{date}T@{time}
END:VTODO
@    (end)
@  (or)
@line
@    (do (put-line line))
@  (end)
@(end)

这本身会将所有条目重写为VTODO：

$ txr  cal.txr cal.ics
BEGIN:VCALENDAR
BEGIN:VTODO
DTSTART:20220340T140000
END:VTODO
BEGIN:VTODO
DTSTART:20230620T193700
END:VTODO
BEGIN:VTODO
DTSTART:20210210T193800
END:VTODO
END:VCALENDAR

我们可以从命令行绑定date和变量：time

$ txr -Ddate=20230620 cal.txr cal.ics
BEGIN:VCALENDAR
BEGIN:VEVENT
DTSTART:20220340T140000
END:VEVENT
BEGIN:VTODO
DTSTART:20230620T193700
END:VTODO
BEGIN:VEVENT
DTSTART:20210210T193800
END:VEVENT
END:VCALENDAR

现在只匹配并重写第二个条目。

漂亮版本：