my %tiere = (); # leerer hash
my %katzen = (
    garfield => 'doof', # mit Werten
);

$tiere{katzen} = \%katzen;

print $tiere{katzen}->{garfield}; # man bemerke den Pfeil nach {katzen}