Perl defined()用法及代碼示例

如果提供的變量“ VAR”的值不是undef值，則Perl中的Defined()返回true；如果未指定VAR，則它檢查$_的值。它可以與許多函數一起使用來檢測操作失敗，因為如果出現問題，它們將返回undef。

如果VAR是一個函數或函數的引用，則如果已定義該函數，則返回true；否則，如果該函數不存在，則返回false。如果指定了哈希元素，則在定義了相應值的情況下返回true，但不會檢查哈希中是否存在鍵

用法： defined(VAR)

參數:
要檢查的VAR

返回:
如果VAR為undef，則返回0；如果VAR包含值，則返回1。

範例1：

#!/usr/bin/perl 
  
# Defining a variable 
$X = "X is defined"; 
  
# Checking for existence of $X  
# with defined() function 
if(defined($X))  
{ 
    print "$X\n"; 
} 
  
# Checking for existence of $Y  
# with defined() function 
if(defined($Y))  
{ 
    print "Y is also defined\n"; 
}  
else
{ 
    print "Y is not defined\n"; 
}

輸出：

X is defined
Y is not defined

範例2：

#!/usr/bin/perl 
  
# Defining a function 
sub X 
{ 
      
    # Defining a variable 
    $VAR = 20; 
} 
  
# Checking for existence of $X  
# with defined() function 
if(defined(X))  
{ 
    print "Function Exists\n"; 
} 
  
# Checking for existence of $Y  
# with defined() function 
if(defined($Y))  
{ 
    print "Y is also defined\n"; 
}  
else
{ 
    print "Y is not defined\n"; 
}

輸出：

Function Exists
Y is not defined

相關用法

注：本文由純淨天空篩選整理自Code_Mech大神的英文原創作品 Perl | defined() Function。非經特殊聲明，原始代碼版權歸原作者所有，本譯文未經允許或授權，請勿轉載或複製。