How do I get the type of a blessed ref? (ARRAY|HASH|SCALAR)

Question

I'm passed a reference, and I want to know its type. For this purpose, "ref" works on unblessed references, but on blessed references it returns the package name it was blessed with.

     $a=[];
     print ref $a;

ARRAY

     bless $a, 'mytype';
     print ref $a;

mytype

How can I get the type?

Answer 1

use Scalar::Util 'reftype';
print reftype bless {}; # HASH