Help for this page

Select Code to Download


  1. or download this
    use Scalar::Util qw( reftype );

...

printf "hashref is ref %s\n", ref $hashref;
printf "hashref is reftype %s\n", reftype $hashref;
  2. or download this
    blessed is ref My::Class
blessed is reftype HASH
hashref is ref HASH
hashref is reftype HASH