Merge pull request #110 from msapiro/fix_109

Fix parsing an email address into local-part and domain
This commit is contained in:
Shawn Iverson 2017-10-21 16:32:28 -04:00 committed by GitHub
commit 2049b107b0

View file

@ -477,7 +477,7 @@ sub address2userdomain {
if ($addr =~ /@/) {
$user =~ s/@[^@]*$//;
$domain =~ s/^[^@]*@//;
$domain =~ s/^.*@//;
}
return ($user, $domain);