use warnings;
no warnings 'numeric';
use Scalar::Util;

$string = '12.3hello';
print Scalar::Util::looks_like_number($string), "\n";

$string *= 2;
print $string, "\n";

__END__

Outputs:
0
24.6