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/