This will match a ! followed by 0 or more not ! chars, I suppose it's matching the 0 part of that. Try a '+' instead of a '*'

$str =~ /\![^!]*/;

PC

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to