my $x = int($str+0);