Perl defined()函数

perl defined()函数，defined()函数学习例子，defined()函数实例代码，defined()函数在线教程等

语法

defined EXPR defined

定义和使用

返回true，如果EXPR是undef以外的值，或检查$_的值如果EXPR未指定。 这可以被用来与许多函数来在操作中检测到故障，由于它们返回undef，如果有一个问题。 一个简单的布尔测试，并未区分虚假，零，空字符串, 或字符串.0，都同样是错误的。

如果EXPR是一个函数或函数参考，然后返回true，如果已定义的函数。 当使用整个数组和哈希表，它并不总是会产生直观的结果。如果一个哈希（hash）元素被指定，它已经定义了相应的值，返回true。但并不确定是否存在指定的键的哈希值。

返回值

• 返回 0，如果EXPR包含未定义（undefine）

• 返回1，如果EXPR包含一个有效的值或参考

#!/usr/bin/perl
#by www.gitbook.net
$var1 = "This is defined";

if( defined($var1) ){
  print "$var1\n";
}
if( defined($var2) ){
  print "var2 is also defined\n";
}else{
  print "var2 is not defined\n";
}

This will produce following result
This is defined
var2 is not defined