Perl 中的 % 变量：哈希表揭秘232

在 Perl 编程语言中，% 符号代表哈希表，一种用于存储和检索键值对的数据结构。哈希表是一种关联数组，其中键与值配对存储，类似于 Python 字典或 Java Map。

声明和初始化哈希表

要声明一个哈希表，请使用以下语法：```
my %hash_name;
```

您可以使用 % 符号后跟哈希表名称来初始化哈希表：```
my %hash_name = (
'key1' => 'value1',
'key2' => 'value2',
'key3' => 'value3',
);
```

访问键值对

要访问哈希表中的键值对，请使用以下语法：```
$value = $hash_name{key};
```

例如，要获取 key1 对应的值，请输入：```
my $value = $hash_name{key1};
```

添加键值对

要将键值对添加到哈希表，请使用以下语法：```
$hash_name{key} = value;
```

例如，要向哈希表中添加键值对 key4 => value4，请输入：```
$hash_name{key4} = 'value4';
```

删除键值对

要从哈希表中删除键值对，请使用以下语法：```
delete $hash_name{key};
```

例如，要从哈希表中删除 key2，请输入：```
delete $hash_name{key2};
```

哈希表遍历

要遍历哈希表中的键值对，可以使用以下方法：foreach 循环：
```
foreach my $key (keys %hash_name) {
my $value = $hash_name{$key};
}
```
while 循环：
```
while (my ($key, $value) = each %hash_name) {
# 处理键值对
}
```
sort 函数：
```
my @sorted_keys = sort keys %hash_name;
```

哈希表函数

Perl 提供了以下哈希表函数：* keys()：返回哈希表中所有键的数组。
* values()：返回哈希表中所有值的数组。
* exists()：检查哈希表中是否存在特定的键。

示例

以下示例展示了如何在 Perl 中使用哈希表：```
my %student_scores = (
'John' => 95,
'Mary' => 88,
'Bob' => 77,
);
# 访问 John 的分数
my $john_score = $student_scores{John};
# 添加 Alice 的分数
$student_scores{Alice} = 92;
# 删除 Bob 的分数
delete $student_scores{Bob};
# 遍历哈希表
foreach my $student (keys %student_scores) {
print "$student: $student_scores{$student}";
}
```