%item = %{$array[0]}; # Creates a copy of the hash
  print $item{key};

##</code><code>##

  no strict "vars"; # Allow local decs
  local *item = \%{$array[0]}; # Creates a ref. No copy.
  print $item{key};