Perl 教程 之 Perl 哈希 9

Perl 哈希

哈希中添加或删除元素

添加 key/value 对可以通过简单的赋值来完成。但是删除哈希元素你需要使用 delete 函数：

实例

!/usr/bin/perl

%data = ('google'=>'google.com', 'baidu'=>'baidu.com', 'taobao'=>'taobao.com');
@keys = keys %data;
$size = @keys;
print "1 - 哈希大小: $size\n";

添加元素

$data{'facebook'} = 'facebook.com';
@keys = keys %data;
$size = @keys;
print "2 - 哈希大小: $size\n";

删除哈希中的元素

delete $data{'taobao'};
@keys = keys %data;
$size = @keys;
print "3 - 哈希大小: $size\n";
执行以上程序，输出结果为：

1 - 哈希大小: 3
2 - 哈希大小: 4
3 - 哈希大小: 3