NULL in Perl

 

NULL in Perl   

2010-03-17 星期六 阴天 @HZ

 

Perl没有指针的概念，所以他提供了两个操作符：defined和undef。但是千万要注意两种不是if-else的关系。

defined(var); 用于判断一个对象是否为undef。值得注意到是perl经常会自作聪明的为一些undef变量提供默认值，比如为undef的字符串初始化为空字符串，为undef的数值型初始化为0.

# let's say you've got the user input in $input..

if (defined($input) && $input ne "") {
  # input is defined and not empty
}
else {
  print "input wasn't filled in/n";
}

 

而undef(var);则是用于将一个变量重置为undef状态。