$temp1=eval { 0+$value1 };
$temp1=$value1 if $@; Perl says it is not a number