perl -e '$str="fff123"; $fu = $str =~ tr/0-9//c; print $fu,"\n";' [download]
In reply to Re^2: count digit in a numeric value by hsinclai in thread count digit in a numeric value by wusphere