| Subject: | Backslash allowed in domain part of address |
If my reading of RFC 2822 is correct, backslash is not allowed in a
dot-atom (one of the options for the domain part of an address).
Hence this program:
use Email::Address;
map { print $_->address, "\n" } Email::Address->parse('[a@b\]');
should not print
a@b\
as it does (using V1.80 of Email::Address, Perl 5.8.7). The problem
seems (most likely) to be in the line:
my $special = q[()<>\\[\\]:;@\\,."];
where comma is being quoted. I think \\\\ was probably intended. I am
not offereing a patch simply because I do not know enough about RFC 2822
to know if this change would break some other part of the code.