Help for this page

Select Code to Download


  1. or download this
    my $res = Net::DNS::Resolver->new(
    nameservers => [qw(ns7.xx.com xx.xx.xx.com)],
...
#}
print "\n";
"DNS_results.plx" 71 lines, 2813 characters
  2. or download this
    root@xxxxx(R3 Prod):/home/
# perl  DNS_results.plx
sap005.alxxxmeX.com
  3. or download this
    $VAR1 = bless( {
                 'rdlength' => 22,
...
                 'rdata' => 'sap005     alarixxxxx'
               }, 'Net::DNS::RR::PTR' );