Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re: Re: Re: Regex probleme, how memorize (match)? with question mark ?

by epoptai (Curate)
on Jul 07, 2001 at 00:21 UTC ( #94593=note: print w/ replies, xml ) Need Help??


in reply to Re: Re: Regex probleme, how memorize (match)? with question mark ?
in thread Regex probleme, how memorize (match)? with question mark ?

True. In order to prevent legal whitespace breaking the match there's still some work left undone around the = sign:

/href\s*=\s*"mailto:([^"]*)"/
Of course this will still fail by only making a partial match if the email value has a double-quote (unlikely).

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


Comment on Re: Re: Re: Regex probleme, how memorize (match)? with question mark ?
Download Code
Re: Re: Re: Re: Regex probleme, how memorize (match)? with question mark ?
by tachyon (Chancellor) on Jul 07, 2001 at 00:49 UTC

    And this can still fail because HREF and MAILTO: in caps are valid so we need a /i to make it case insensitive

    /href\s*=\s*"mailto:([^"]*)"/i

    Are we there yet?

    cheers

    tachyon

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

      I can see two improvements toward making it bulletproof:

      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

      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 :-/

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://94593]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (8)
As of 2014-09-16 08:31 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (158 votes), past polls