无涯教程-Perl - defined函数

描述

如果 EXPR 的值不是undef值,则此函数返回true；如果未指定 EXPR ,则检查$_的值。它可以与许多功能一起使用以检测操作失败,因为如果出现问题,它们将返回undef。简单的布尔测试不会区分false,零,空字符串或字符串.0。

如果 EXPR 是函数或函数引用,则在定义函数后返回true。当与整个数组和哈希一起使用时,它不会总是产生直观的输出。如果指定了哈希元素,则如果已定义了相应的值,则返回true,但不会确定哈希中是否存在指定的键。

语法

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

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

参考链接

www.learnfk.com/perl/perl-d…