Re: search for exact string

my $toFind="String"; 
foreach (@list){  
   next unless /$toFind/i;
   next if /$toFind[.][hco]/i;
   print;
}
[download]

Or you could look up "lookahead"

Comment on Re: search for exact string Download Code

Replies are listed 'Best First'.
Re^2: search for exact string by amarquis (Curate) on Mar 27, 2008 at 13:01 UTC
I replied to the other thread before I saw the double post (my answer was confused, to boot). But, I figured I'd use this as a good time to learn about lookaheads: `my @lines = ( q(String), q(I have a String), q(I have a String and a .c), q(I have a String.c), q(String.O) ); foreach (@lines) { #Look for String, not followed by .c, .o next unless /String(?![.][coCO])/; print $_ . "\n"; } Output: String I have a String I have a String and a .c` [download] I have to get less lazy about learning new facets of Perl, it is always much less painful/time-consuming to get a grasp of the basics than I think it is going to be.	[reply] [d/l]

Replies are listed 'Best First'.

Re^2: search for exact string
by amarquis (Curate) on Mar 27, 2008 at 13:01 UTC

I replied to the other thread before I saw the double post (my answer was confused, to boot). But, I figured I'd use this as a good time to learn about lookaheads:

my @lines = ( q(String),
              q(I have a String),
              q(I have a String and a .c),
              q(I have a String.c),
              q(String.O) );

foreach (@lines) {
    #Look for String, not followed by .c, .o
    next unless /String(?![.][coCO])/;
    print $_ . "\n";
}

Output:
String
I have a String
I have a String and a .c
[download]

I have to get less lazy about learning new facets of Perl, it is always much less painful/time-consuming to get a grasp of the basics than I think it is going to be.

[reply]
[d/l]