On Tue, Apr 1, 2008 at 11:09 AM, Rob Dixon <[EMAIL PROTECTED]> wrote:
[snip] > > my ($lastdigit) = $number =~ /.*([0-9])/; > > gives you the last decimal digit (even if there are non-decimals after > it). > Better yet: my ($last) = $number =~ /.*(\d)/; Let Perl worry about what is and isn't a digit. Best, -- jay -------------------------------------------------- This email and attachment(s): [ ] blogable; [ x ] ask first; [ ] private and confidential daggerquill [at] gmail [dot] com http://www.tuaw.com http://www.downloadsquad.com http://www.engatiki.org values of β will give rise to dom!