meow.sh/splittags.awk

14 lines
286 B
Awk
Raw Permalink Normal View History

2013-05-25 19:15:43 -07:00
{
2014-03-15 08:37:34 -07:00
str=$0
topen="<"tag">"
tclose="</"tag">"
len=length(tag)
for (;;) {
begin=index(str, topen)
end=index(str,tclose)
if (!(begin || end)) break
print substr(str, begin+len+2, end-begin-len-2)
str=substr(str, end+len+3)
}
2013-05-25 19:15:43 -07:00
}