From a53513e3a07c3f9dde99158c22273ba51be40fae Mon Sep 17 00:00:00 2001
From: Ricardo Signes <rjbs@cpan.org>
Date: Sat, 14 Jun 2014 00:17:19 -0400
Subject: [PATCH 5/8] only the final angle-addr in the parse contains addr

this is such a bodge :(
---
 lib/Email/Address.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Email/Address.pm b/lib/Email/Address.pm
index a50402e..acece12 100644
--- a/lib/Email/Address.pm
+++ b/lib/Email/Address.pm
@@ -221,7 +221,7 @@ sub parse {
       s/$comment//go if @comments;
 
       my ($user, $host, $com);
-      ($user, $host) = ($1, $2) if s/<($local_part)\@($domain)>//o;
+      ($user, $host) = ($1, $2) if s/<($local_part)\@($domain)>\s*\z//o;
       if (! defined($user) || ! defined($host)) {
           s/($local_part)\@($domain)//o;
           ($user, $host) = ($1, $2);
-- 
2.0.0