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


in reply to Help with a regex

#!/usr/bin/perl my $string="testing.123"; $string =~ /\.([0-9]+)$/; $result = $1; print "$result\n";