print STDERR $rr->string, "\n" if $opts{d};
push (@refs, $rr->nsdname) if $rr->type eq 'NS';
next unless lc($rr->name) eq lc($zone);
add_nslist_to_data($pkt);
print STDERR $rr->string, "\n" if $opts{d};
push (@refs, $rr->nsdname) if $rr->type eq 'NS';
next unless lc($rr->name) eq lc($zone);
add_nslist_to_data($pkt);