Hash - Key zu Wert ...

[alligator]

Hallo,

ich möchte den Key zu einen Wert herausfinden, geht das auch einfacher als so :

$mitt="Mittwoch";
%hash= (
"Mo" => "Montag",
"Di" => "Dienstag",
"Mi" => "$mitt",
"Do" => "Donnerstag",
);

foreach $key (sort keys %hash)
{if ($hash{$key} eq "Dienstag")
 {print "Dienstag hat den Key: $key\n"}
}

Gruß
alligator