perl使用变量是不需要声明的,所以不存在变量是否存在的问题,只要你在代码里用到了这个变量,它就存在,默认值是undef, defined 是判断变量是否赋值了,即是不是undef,如果想判断哈希中的键值是否存在,可以使用exists $hash{$a},就是判断是不是有这个$a的键值
Perl的功能强大,对于这两个问题,都能用一句话来表示。
判断一个变量是否为空:
if ($blah != 0 || defined $blah)
判断一个哈希中是否存在一个给定的键:
if ($blah{$foo} ~~ $bar)