# FS – разделител на полетата да е нов ред “\n”
# RS – разделителя между записите
# тук всеки запис е между низове които започват с <2011- и завуршват с >
BEGIN { RS =”<2011-[^>]*>” ; FS =”\n” }
{
# ако в записа $0 (целя запис) има с ” STATEMENT: SELECT”
if (substr($0,1,19) ~ ” STATEMENT: SELECT”)
{
# ако в записа $0 няма $1,$2,$3 или $4 и в записа $0 няма символа “;”
if ($0 !~ /\$[1-4]/ && $0 !~ /.*;.*/)
{
# Изпечатва записа $0 от 12 символ нататък
print substr($0,12) ” ;”
}
}
}