view release on metacpan or  search on metacpan

README.pod  view on Meta::CPAN

    } else {
        print $lmx->error,"\n";
        my @not_ping_ip = $lmx->not_ping;
        my @not_ask_ip  = $lmx->not_ask;
    }
    
=head1 PACKAGE VARIABLES

=head2 $CCCP::LiveMX::timeout

Timeout for ping, resolve and another.
By default 5 sec.

=head1 METHODS

=head2 check_host($host_name)

Checking MX records for C<$host_name> and return instance.

=head2 success()

lib/CCCP/LiveMX.pm  view on Meta::CPAN

    } else {
        print $lmx->error,"\n";
        my @not_ping_ip = $lmx->not_ping;
        my @not_ask_ip  = $lmx->not_ask;
    }
    
=head1 PACKAGE VARIABLES

=head2 $CCCP::LiveMX::timeout

Timeout for ping, resolve and another.
By default 5 sec.

=head1 METHODS

=cut

$CCCP::LiveMX::timeout = 5;

my $resolver;
my $ping;