Select Code to Download

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

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