Help for this page
#!/usr/bin/perl ... print "\n"; my $serial=($query->answer)[0]->serial, if ($query); print "serial: $serial\n";
[root@ns01 jzack]# ./snippet IPV4 test... ... serial: