Help for this page
Select Code to Download
Select
or
download this
my $two = substr($val, -2) if substr($val, -3, 1) eq '-';