Help for this page

Select Code to Download


  1. or download this
    use strict;
    use Data::Dumper;
    ...
    my $res = Net::DNS::Resolver->new;
    my  @mx = mx($res, $domain);
    print Dumper (@mx);
    
  2. or download this
    'exchange' => 'mta7.am0.yahoodns.net'
    'exchange' => 'mta5.am0.yahoodns.net'
    'exchange' => 'mta6.am0.yahoodns.net'