Вопрос по Perl

<TABLE BORDER=0 ALIGN=CENTER WIDTH=85%><TR><TD>Quote<HR></TD></TR><TR><TD><FONT SIZE=-1><BLOCKQUOTE>
On 2001-08-26 1719, Anonymous wrote
Есть некоторая переменная $х в которой хранится некоторое число (например 123).
Как определить последнюю цифру в этом числе (в нашем случае 3)?

P.S. Perl, к сожалению, я знаю не очень, но есть большая нужда исправить 1 готовый скрипт.
</BLOCKQUOTE></FONT></TD></TR><TR><TD><HR></TD></TR></TABLE>

Преобразовать в строку и вытащить из получившейся строки последний символ, т.е. 3

<TABLE BORDER=0 ALIGN=CENTER WIDTH=85%><TR><TD>Quote:<HR></TD></TR><TR><TD><FONT SIZE=-1><BLOCKQUOTE>
Есть некоторая переменная $х ...
</BLOCKQUOTE></FONT></TD></TR><TR><TD><HR></TD></TR></TABLE>
очень просто, вот так:
---
$x=~/.*(.)\Z/;
$result=$1;
---
вынимает последний символ в любой строке