Unnamed

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;
}