在Perl中创建哈希

Perl哈希是通过以下两种方式之一创建的。在第一种方法中，您要一个一个地为命名键分配一个值-

$data{'John Paul'} = 45;
$data{'Lisa'} = 30;
$data{'Kumar'} = 40;

在第二种情况下，您使用一个列表，该列表是通过从列表中选取单个对来转换的：该对中的第一个元素用作键，第二个元素用作值。例如-

%data = ('John Paul', 45, 'Lisa', 30, 'Kumar', 40);

为了清楚起见，您可以使用=>作为其别名，以指示键/值对，如下所示：

%data = ('John Paul' => 45, 'Lisa' => 30, 'Kumar' => 40);

这是上述形式的另一种形式，请看一下，这里所有键之前都带有连字符(-)，并且在它们周围都不需要引号-

%data = (-JohnPaul => 45, -Lisa => 30, -Kumar => 40);

但重要的是要注意，只有一个单词，即，没有空格键以这种散列形式使用，并且如果您以此方式建立散列，则仅使用连字符来访问键，如下所示。

$val = %data{-JohnPaul}
$val = %data{-Lisa}