perl 中的哈希賦值

在perl 中，通過代碼動態的給哈希賦值，是最常見的應用場景，但是有些情況下，我們事先知道一些信息，當需要把這些信息存放進一個哈希的時候，直接給哈希賦值就好；

哈希的key不用說，就是一個字符串，關鍵是value, 大概有下面3種：

1）一個值

就是一個普通的一維哈希，直接賦值即可

代碼示例：

my %hash = (
'a' => 1,
'b' => 2,
);
print qq{$hash{a}\n};

2）一個列表

這種情況下直接把值寫成一個列表是不行的，在perl中，哈希的值也是一個標量，所以應該用一個列表的引用

代碼示例：

my %hash = (
'a' => [1, 2, 3],
'b' => [1, 2, 3],
);

print qq{$hash{a}->[0]\n};

3）一個哈希

和列表類似，直接用哈希的引用就可以了

代碼示例：

my %hash = (
'a' => { '1' => 1, '2' => 2},
'b' => {' 1' => 1, '2' => 2},
);

print qq{$hash{a}->{1}\n};

上面這種情況，其實就是申明了一個二維哈希