Re: Regex To Remove File Extension (rindex)

Just for the TIMTOWTDI, here's one using substr and rindex:

my $n = 'foo.bar.txt';
$n = substr $n, 0, rindex( $n, q{.} );
[download]

In my own code, I'd write s{ \. [^.]+ \z }{}xms

Comment on Re: Regex To Remove File Extension (rindex) Select or Download Code

Replies are listed 'Best First'.
Re^2: Regex To Remove File Extension (rindex) by almut (Canon) on Dec 10, 2008 at 21:50 UTC
...or, using `substr()` as an lvalue: `substr($n,rindex $n,'.') = '';` [download]	[reply] [d/l] [select]