Re: Get the Key corresponding to any given value

[simmisam]

my ($key) = grep {$value ~~ $hash{$_}} keys %hash;
print "Key = $key\n";

[LanX]

values are not necessarily unique so the left hand side should be a list.

and using smart match doesn't make sense, better decide if == or eq are appropriate.

simmisam did you notice that most of your recent answers in this category were rejected by QandAEditors b/c of poor quality?

And (sadly) I have to say, I hope this one too!

Maybe you should stop playing this game till you are more experienced?

[jdporter]

I'm actually OK with this one, but I would prefer that he would include an explanation of the value of his approach, i.e. describe the situations in which he thinks it could be useful.

[LanX]

> I'm actually OK with this one...

Well a 90% copy from the second part of the first answer, just that everything changed is worse now.

I can't see how readers may rather profit instead of being confused or mislead.