Given this code...

#!/usr/bin/perl -w
$f = ">123<";
$g = substr($f,1);
$d = int($g);
print $d;
exit();


Results in 

Argument "123<" isn't numeric in int at test.pl line 4