| Subject: | validates email addresses that are RFC822 no compliant |
| Date: | Sun, 12 Sep 2010 19:46:54 +0200 |
| To: | bug-Mail-RFC822-Address [...] rt.cpan.org |
| From: | Salvatore Bonaccorso <carnil [...] cpan.org> |
Hi Paul
This is a forward of http://bugs.debian.org/509678 reporded in 2008 by
a Debian User. Mail-RFC822-Address validates email addresses which
contain non-ASCII caracters, and permits '|' in the domain part.
This can be seen with the script the user attached:
---(snip)---------------------------------------------------------------
#! /usr/bin/perl
use Mail::RFC822::Address qw(valid validlist);
@addresses = (
'á@example.com',
'ü@example.com',
'ñ@example.com',
'a@|example.com'
);
$list = join (', ', @addresses);
print "Testing the \"valid\" function...\n";
foreach (@addresses) {
if (valid($_)) {
print "\t$_ is a valid address.\n";
} else {
print "\t$_ is NOT a valid address.\n";
}
}
print "\nNow testing the \"validlist\" function...\n";
if (validlist($list)) {
print "\t\"$list\" is a valid address list.\n\n";
} else {
print "\t\"$list\" is NOT a valid address list.\n\n";
}
---(snap)---------------------------------------------------------------
Bests
Salvatore
Message body not shown because it is not plain text.