On Fri, Sep 20, 2002 at 09:00:25AM -0500, Philip Ledoux wrote:
> I would like to know if anyone has written a module to check both the
> domain name and usernames of an email address to see if email address
> is valid
NAME
Mail::CheckUser - check email addresses for validity
SYNOPSIS
use Mail::CheckUser qw(check_email);
my $ok = check_email($email_addr);
use Mail::CheckUser qw(:constants check_email last_check)
my $ok = check_email($email_addr);
print "DNS timeout\n"
if last_check()->{code} == CU_DNS_TIMEOUT;
use Mail::CheckUser;
my $res = Mail::CheckUser::check_email($email_addr);
DESCRIPTION
This Perl module provides routines for checking validity
of email address.
It makes several checks:
1 It checks the syntax of an email address.
2 It checks if there any MX records or A records for the
domain part of the email address.
3 It tries to connect to an email server directly via
SMTP to check if mailbox is valid. Old versions of
this module performed this check via the VRFY command.
Now the module uses another check; it uses a combina
tion of MAIL and RCPT commands which simulates sending
an email. It can detect bad mailboxes in many cases.
For example, hotmail.com mailboxes can be verified
with the MAIL/RCPT check.
[...]
--
Clay Irving <[EMAIL PROTECTED]>
16.5 feet in the Twilight Zone: 1 Rod Serling
