for domain yahoo.com I am getting 3 records:use strict; use Data::Dumper; ######################################### die "INPUT: domain:\n" if (@ARGV != 1); my $domain = $ARGV[0]; ######################################### # Use your own resolver object. use Net::DNS; my $res = Net::DNS::Resolver->new; my @mx = mx($res, $domain); print Dumper (@mx);
'exchange' => 'mta7.am0.yahoodns.net' 'exchange' => 'mta5.am0.yahoodns.net' 'exchange' => 'mta6.am0.yahoodns.net'
In reply to exchange in Net::DNS by vit
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |