http://qs1969.pair.com?node_id=1184878


in reply to Re: How to remove the words before the dot using perl?
in thread How to remove the words before the dot using perl?

Parts of the OP suggest that File::Basename may be preferable to custom coding.

> my $suffix = $file; # suggests a file name > ... > rev1.config # looks like a file name
The desired result may need some care in reading the module documentation
perldoc File::Basename
with extra attention near the helpful line:
fileparse("/foo/bar/baz.txt", qr/\.[^.]*/);
Ron