mblaze/contrib/mfillmid
2016-07-20 18:48:12 +02:00

15 lines
321 B
Bash
Executable File

#!/bin/sh
# mfillmid - fill in files for message-ids (via mairix)
exec awk '
function q(a) { gsub("\\47", "\47\\\47\47", a); return "\47"a"\47" }
/<..*>/ {
match($0, "<..*>")
mid = substr($0, RSTART+1, RLENGTH-2)
if ("mairix -r m:" q(mid) | getline file) {
print substr($0, 0, RSTART-1) file
next
}
}
{ print }'