Perl defined 函数

• 

  描述

  defined 如果EXPR的值不是undef值，则此函数返回true；如果未指定EXPR，则检查$_的值。它可以与许多功能一起使用来检测操作失败，因为如果出现问题，它们将返回undef。简单的布尔测试不会区分假，零，空字符串或字符串.0。如果EXPR是函数或函数引用，则在定义函数后返回true。当与整个数组和哈希一起使用时，它不会总是产生直观的结果。如果指定了哈希元素，则如果已定义了相应的值，则返回true，但不会确定哈希中是否存在指定的键。
• 

  句法

  以下是此函数的简单语法-

  
  defined EXPR
  
  defined
  

• 

  返回值

  如果EXPR包含undef，则此函数返回0；如果EXPR包含有效值或引用，则此函数返回1。
• 

  示例

  以下是显示其基本用法的示例代码-

   
  $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 is defined
  var2 is not defined