# Scalar::Util Native implementation of Scalar::Util Provides scalar utility functions (blessed, reftype, etc.) # Synopsis ```none use Scalar::Util qw(blessed reftype weaken looks_like_number); if (blessed $obj) { print ref($obj), "\n"; } my $type = reftype($ref); # "HASH", "ARRAY", etc. weaken($ref); # prevent circular reference leak if (looks_like_number($str)) { print "$str is numeric\n"; } ``` Perl equivalent: Scalar::Util