perl -E "say ref {a=>33}"
HASH

perl -E "say ref bless{a=>33},'Some::Package'"
Some::Package