相关疑难解决方法(0)

你如何选择随机哈希密钥？对于我的Flash + Perl纸牌游戏,我试图从哈希中选择一张随机牌,其中键是:"6个黑桃","6个俱乐部"等,如下所示:

my $card;
my $i = 0;
for $card (keys %{$user->{HAND}}) {
    last if rand(++$i) < 1;
}
delete $user->{HAND}->{$card};
print "random card: $card\n";

我想知道这是正确的方式还是有更好的方法.