See chocolateboy's response in "How to tell apart numeric scalars and string scalars in Perl?"

use autobox::universal qw(type);

say type("42");  # STRING
say type(42);    # INTEGER
say type(42.0);  # FLOAT 
say type(undef); # UNDEF
[download]