对作为哈希键

Question

有没有人知道如何使用perl作为密钥的字符串对进行散列？

就像是...

{
    ($key1, $key2) => $value1;
    ($key1, $key3) => $value2;
    ($key2, $key3) => $value3;

等等....

Answer 1

您不能将一对标量作为哈希键,但您可以创建多级哈希:

my %hash;
$hash{$key1}{$key2} = $value1;
$hash{$key1}{$key3} = $value2;
$hash{$key2}{$key3} = $value3;

如果要一次定义所有内容:

my %hash = ( $key1 => { $key2 => $value1, $key3 => $value2 },
             $key2 => { $key3 => $value3 } );

或者,如果它适用于您的情况,您可以将您的密钥连接在一起

$hash{$key1 . $key2} = $value1;   # etc

或者添加分隔符以分隔键:

$hash{"$key1:$key2"} = $value1;   # etc