in reply to Regex To Remove File Extension
You have plenty of good examples to chose from. This might work for you also:
Jamiemy $string = 'foo.bar.txt'; $string =~ s/\.\w{3}$//;
In Section
Seekers of Perl Wisdom