exists $INC{$module}; return undef; } sub been_numeric { my $value = shift; # From Mojo::JSON return 1 if B::svref_2object(\$value)->FLAGS & (B::SVp_IOK | B::SVp_NOK) and 0 + $value e