Re^2: grep question using multiple lines

in reply to Re: grep question using multiple lines
in thread grep question using multiple lines

Thanks, but like I so carefully pointed out, I'm not just looking for email addresses. I'm aware of all the parsing modules out there. This is just an exercise in grepping and looking for an academic answer.

—Brad
"The important work of moving the world forward does not wait to be done by perfect men." George Eliot

Comment on Re^2: grep question using multiple lines

Replies are listed 'Best First'.
Re^3: grep question using multiple lines by Anonymous Monk on Dec 28, 2008 at 11:04 UTC
`$Email::Address::addr_spec` This regular expression defined what an email address is allowed to look like. (?-xism:(?-xism:(?-xism:(?-xism:(?-xism:\s\((?:\s(?-xism:(?-xism:(?> +[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-xism:\s\((?:\s(?-xism +:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|))\s\)\s))) +\s\)\s)\|\s+)(?-xism:[^\x00-\x1F\x7F()<>\[\]:;@\\,."\s]+(?:\.[^\x0 +0-\x1F\x7F()<>\[\]:;@\\,."\s]+))(?-xism:(?-xism:\s\((?:\s(?-xism:( +?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-xism:\s\((?: +\s(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|))\ +s\)\s)))\s\)\s)\|\s+))\|(?-xism:(?-xism:(?-xism:\s\((?:\s(?-xis +m:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-xism:\s\( +(?:\s(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|) +)\s\)\s)))\s\)\s)\|\s+)"(?-xism:(?-xism:[^\\"])\|(?-xism:\\(?-xi +sm:[^\x0A\x0D])))+"(?-xism:(?-xism:\s\((?:\s(?-xism:(?-xism:(?>[^() +\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-xism:\s\((?:\s(?-xism:(?- +xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|))\s\)\s)))\s* +\)\s)\|\s+)))\@(?-xism:(?-xism:(?-xism:(?-xism:\s\((?:\s(?-xism:(? +-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-xism:\s\((?:\ +s(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|))\s +\)\s)))\s\)\s)\|\s+)(?-xism:[^\x00-\x1F\x7F()<>\[\]:;@\\,."\s]+( +?:\.[^\x00-\x1F\x7F()<>\[\]:;@\\,."\s]+))(?-xism:(?-xism:\s\((?:\s +(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-xism +:\s\((?:\s(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0 +D]))\|))\s\)\s)))\s\)\s)\|\s+))\|(?-xism:(?-xism:(?-xism:\s\((?: +\s(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-x +ism:\s\((?:\s(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A +\x0D]))\|))\s\)\s)))\s\)\s)\|\s+)\[(?:\s(?-xism:(?-xism:[^\[\]\ +\])\|(?-xism:\\(?-xism:[^\x0A\x0D]))))\s\](?-xism:(?-xism:\s\((?:\s +(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x0D]))\|(?-xis +m:\s\((?:\s(?-xism:(?-xism:(?>[^()\\]+))\|(?-xism:\\(?-xism:[^\x0A\x +0D]))\|))\s\)\s)))\s\)\s)\|\s+)))) [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: grep question using multiple lines
by Anonymous Monk on Dec 28, 2008 at 11:04 UTC

$Email::Address::addr_spec

(?-xism:(?-xism:(?-xism:(?-xism:(?-xism:\s*\((?:\s*(?-xism:(?-xism:(?>
+[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-xism:\s*\((?:\s*(?-xism
+:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|))*\s*\)\s*)))
+*\s*\)\s*)|\s+)*(?-xism:[^\x00-\x1F\x7F()<>\[\]:;@\\,."\s]+(?:\.[^\x0
+0-\x1F\x7F()<>\[\]:;@\\,."\s]+)*)(?-xism:(?-xism:\s*\((?:\s*(?-xism:(
+?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-xism:\s*\((?:
+\s*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|))*\
+s*\)\s*)))*\s*\)\s*)|\s+)*)|(?-xism:(?-xism:(?-xism:\s*\((?:\s*(?-xis
+m:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-xism:\s*\(
+(?:\s*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|)
+)*\s*\)\s*)))*\s*\)\s*)|\s+)*"(?-xism:(?-xism:[^\\"])|(?-xism:\\(?-xi
+sm:[^\x0A\x0D])))+"(?-xism:(?-xism:\s*\((?:\s*(?-xism:(?-xism:(?>[^()
+\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-xism:\s*\((?:\s*(?-xism:(?-
+xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|))*\s*\)\s*)))*\s*
+\)\s*)|\s+)*))\@(?-xism:(?-xism:(?-xism:(?-xism:\s*\((?:\s*(?-xism:(?
+-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-xism:\s*\((?:\
+s*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|))*\s
+*\)\s*)))*\s*\)\s*)|\s+)*(?-xism:[^\x00-\x1F\x7F()<>\[\]:;@\\,."\s]+(
+?:\.[^\x00-\x1F\x7F()<>\[\]:;@\\,."\s]+)*)(?-xism:(?-xism:\s*\((?:\s*
+(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-xism
+:\s*\((?:\s*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0
+D]))|))*\s*\)\s*)))*\s*\)\s*)|\s+)*)|(?-xism:(?-xism:(?-xism:\s*\((?:
+\s*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-x
+ism:\s*\((?:\s*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A
+\x0D]))|))*\s*\)\s*)))*\s*\)\s*)|\s+)*\[(?:\s*(?-xism:(?-xism:[^\[\]\
+\])|(?-xism:\\(?-xism:[^\x0A\x0D]))))*\s*\](?-xism:(?-xism:\s*\((?:\s
+*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x0D]))|(?-xis
+m:\s*\((?:\s*(?-xism:(?-xism:(?>[^()\\]+))|(?-xism:\\(?-xism:[^\x0A\x
+0D]))|))*\s*\)\s*)))*\s*\)\s*)|\s+)*)))
[download]

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom