print 0+(keys %h);

##</code><code>##

  0+@{$h{'key'}}