in reply to regex: something...(!something)...something
You could use negative lookahead. An example:
use strict; use warnings; my @lines = <DATA>; my $data; foreach $data (@lines) { if($data =~ /sometext (?!not)\w* endtext/) { print "$data passed \n"; } } __DATA__ sometext not endtext sometext positive endtext
outputs
sometext positive endtext passed
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^2: regex: something...(!something)...something
by aaaone (Initiate) on Jul 17, 2008 at 17:41 UTC |