Front page | perl.beginners |
Postings from November 2009
> > > Can anyone tell me how to write a regular expression which matches
> > > anything _except_ a litteral string ?
> One could also use a zero-with negative look-ahead assertion:
>
> #!/usr/bin/perl -w
>
> use strict;
>
> while( my $line = <DATA> ){
> if( $line =~ m/^(?!Nomatch)/ ){
> print "match: $line";
> }
>
> }
Thanks a lot for the reply, that worked perfectly in my application.
David
Thread Previous