Concerning passing refs of anonyme Hash to subs...

[Deviloper]

Hi there,

have a look at this example:
########################################################
#!/usr/local/bin/perl
use strict;
use warnings;

my $a_hash = { hund => "Dogge",
              katze => "Perser",
              obst => "Banane"
              };

sub test($){

  my $x = shift;

  print $x->{katze}; # Is this the same
  print $$x{"katze"}; # as this?
}

test($a_hash);
######################################################

Do the both "print" lines the same thing
or do they only result in the same thing?

Thanks,
D.Oper