DB<123> print ref \%h
HASH
  DB<124> bless \%h, EMPTY
 
  DB<125> print ref \%h
EMPTY
  DB<126> delete ${main::}{h}
 
  DB<127> print ref \%h
HASH