1. you never know when someone will use single quotes
2. or linebreaks

In this kind of golf the code tends to get longer 8^}

/href\s*=\s*["']mailto:([^"']*)["']/si
[download]

Someone should mention HTML::Parser.

--
Check out my Perlmonks Related Scripts like framechat, reputer, and xNN.

Hmm, good additions. I'm trying to think of new additions

Thinking, please wait.......................................
............................................................
............................................................
............................................................
............................................................
............................................................
............................................................
............................................................
............................................................
............................................................
............................................................
.................Ctl-Alt-Del

Endless loop, I might have to go and read the tag specs!!

BTW If you just say use HTML::Parser you would ruin all this fun so best we keep it a secret :-)

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

Thank epoptai,
but there no need to had more stuff :o)
It's harder enough to match the two strings...
I know exactly what I can find, in this case. NO simple quote, neither breakline... :o)

I tried something with HTML::Parser, but I DEFINITLY don't undestand HOW IT WORKS... Neither examples in perldoc or examples found in PerlMonks enlight me.

So maybe you can explain me...
First I initialize a object, OK ! Then I have got 3 functions "start", "end" ... what's for ?
What does the function $p->parse() ?
How can I print parse result ?

BobiOne The losted Man :-/