Select Code to Download

use Scalar::Util qw< looks_like_number >;
use Test::More tests => 6;
...
ok looks_like_number '1.0';
ok looks_like_number '123.0';
ok looks_like_number '-123.0';