On Jan 23, 2007, at 9:55 AM, Dr.Ruud wrote:

Use an anchor and a negated character set:

  s/\.[^.]*$//

That solution is broken, think "/foo/bar.baz/woo". Correct regexps and other approaches have already been posted.

-- fxn


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


Reply via email to