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