Re: Regexp: Match anything except a certain word


more useful options
	PerlMonks

Re: Regexp: Match anything except a certain word

by SamCG (Hermit)

on Apr 21, 2006 at 17:07 UTC ( #544948=note: print w/replies, xml )

Need Help??

in reply to Regexp: Match anything except a certain word

Sounds like you want a negative look-ahead? Aren't those expressed something like $test=~/<a.+?(?!target).+?>/;?

Sort of guessing at the form, but I think that's what you're after...

update: this has a problem because of the .+.

-----------------
_{s''limp';@p=split '!','n!h!p!';s,m,s,;$s=y;$c=slice @p1;so brutally;d;$n=reverse;$c=$s**$#p;print(''.$c^chop($n))while($c/=$#p)>=1;}

Comment on Re: Regexp: Match anything except a certain word Select or Download Code

Replies are listed 'Best First'.

Re^2: Regexp: Match anything except a certain word
by ikegami (Patriarch) on Apr 21, 2006 at 17:15 UTC

That's not how you use the negative lookahead. It won't work. For example,

'<a href="..." target="...">' =~ /
   <a            # Matches '<a'.
   .+?           # Matches ' '.
   (?!target)    # Matches. (/\Gtarget/ doesn't match.)
   .+?           # Matches 'href="..." target="..."'.
   >             # Matches '>'.
/isx;
[download]

'<a target="..." href="...">' =~ /
   <a            # Matches '<a'.
   .+?           # Matches ' t'.
   (?!target)    # Matches. (/\Gtarget/ doesn't match.)
   .+?           # Matches 'arget="..." href="..."'.
   >             # Matches '>'.
/isx;
[download]

The common use of a negative lookahead is

/(?:(?!$re).)*/
[download]

See my earlier post for the fix.

[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://544948]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others taking refuge in the Monastery: (4)

As of 2022-01-22 17:48 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?