%h = ( 1.000 => 'foo' ) ;
  
  print "value: $h{1}\n" ;

##</code><code>##

  $h{2.000} = 'bar' ;
  
  print "value: $h{2}\n" ;