Help for this page
use Object::MultiType; ... print %{$obj} ? 'hash' : 'empty hash', "\n"; __END__ empty hash