| Subject: | all-equals email address fails to VERP decode |
| Date: | Fri, 29 Jun 2007 17:24:33 -0700 |
| To: | bug-Mail-Verp [...] rt.cpan.org |
| From: | Joe Edmonds <joe [...] thisnext.com> |
I'm using Mail::Verp VERSION 0.05 .
I would expect any valid, VERP-encoded address pair could be decoded.
This pair cannot, because the recipient address contains an equals
sign:
perl -MMail::Verp -e '$v = Mail::Verp->new; print $v->decode($v->encode(q{a@example.org},q{=@example.com})),"\n";'
Perhaps changing this line:
$address =~ m/^(.+?)\Q${SEPARATOR}\E([^=]+)=([^\@]+)\@(.+)/){
to this:
$address =~ m/^(.+?)\Q${SEPARATOR}\E(.+)=([^\@]+)\@(.+)/){
would fix the problem, but I don't know exactly how VERP works, so
consider that a naive guess.