Perl 定义的函数


描述

如果EXPR 的值不是 undef 值,则该函数返回 true ;如果未指定EXPR ,则检查 $_ 的值。这可以与许多函数一起使用来检测操作中的失败,因为如果出现问题它们会返回 undef。简单的布尔测试无法区分 false、零、空字符串或字符串 .0.,这些都同样为 false。

如果EXPR是函数或函数引用,则如果该函数已定义,则返回 true。当与整个数组和哈希一起使用时,它并不总是产生直观的结果。如果指定了一个hash元素,如果对应的值已经定义则返回true,但不判断指定的key是否存在于hash中。

句法

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

defined EXPR

defined

返回值

如果 EXPR 包含 undef,则该函数返回 0;如果 EXPR 包含有效值或引用,则该函数返回 1。

例子

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

#!/usr/bin/perl

$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
perl_function_references.htm