在Perl哈希中添加和删除元素
使用简单的赋值运算符，只需一行代码即可在Perl哈希中添加新的键/值对。但是要从哈希中删除元素，您需要使用delete函数，如下面的示例所示-
示例
#!/usr/bin/perl
%data = ('John Paul' => 45, 'Lisa' => 30, 'Kumar' => 40);
@keys = keys %data;
$size = @keys;
print "1 - Hash size: is $size\n";
# adding an element to the hash;
$data{'Ali'} = 55;
@keys = keys %data;
$size = @keys;
print "2 - Hash size: is $size\n";
# delete the same element from the hash;
delete $data{'Ali'};
@keys = keys %data;
$size = @keys;
print "3 - Hash size: is $size\n";输出结果
这将产生以下结果-
1 - Hash size: is 3 2 - Hash size: is 4 3 - Hash size: is 3