http://www.perlmonks.org?node_id=717539

spivey49 has asked for the wisdom of the Perl Monks concerning the following question:

Given a vairable legnth string like "4.3.25" or "1.4.3.25" I need to truncate the ".25", preserving the "4.3" or "1.4.3".

I've been using substr and length for a quick and dirty cludge, but I'd like to replace it with a single regex. Any suggestions?