Re: Negative expressions with alternation in ProxyRemoteMatch

[Roger]

in reply to Negative expressions with alternation in ProxyRemoteMatch

Try negative look ahead.

my @str = qw/ a.jpg b.gif c.png d.txt e.jpeg a.jpg.3 /;

for my $str (@str) {
  if ($str =~ /.*?\.(?!gif|jpe?g)/) {
    print "matched: $str\n";
  }
}

__END__

# output is
matched: c.png
matched: d.txt
matched: a.jpg.3

[redhotpenguin]

Thanks for the help, this is what I was trying to do. Works great, and it makes sense that the '?!' (whabang?) is at the start of the alternation.

[Roger]

An alternative is to use negative look behind... Your code was actually negative look ahead. To look behind, you need the < directive.



/(?<!\.gif)(?<!\.jpg)(?<!\.jpeg)$/