BEGIN { nz_found = 0; } /^aut-num:/ { dump = 1; start = NR; } dump == 1 { as_info[NR] = $0; if ($0 ~ /[Nn][Zz]/ ) { nz_found = 1; } } /^source:/ { if (nz_found) { print "Hai I found NZ"; for (i = start; i <= NR; i++) { print as_info[$i]; } } delete as_info; nz_found = 0; dump = 0; }