in reply to String matching problem

This captures the last character, also asserting it is a digit. 
my ($last_char_digit) = ($string =~ /(\d)\z/);

[download]
If your "always" isn't true, then the value will be undef.

-- Randal L. Schwartz, Perl hacker

Replies are listed 'Best First'.
A reply falls below the community's threshold of quality. You may see it by logging in.

In Section Seekers of Perl Wisdom