1.使用||來建立默認(rèn)值
??? $foo = $bar || "DEFAULT VALUE"; #如果$bar沒有值的話就使用"DEFAULT VALUE"作為$foo的值.
$dir = shift(@ARGV) || "/tmp"; #如果沒有參數(shù),,就返回"/tmp".
$dir = defined($ARGV[0]) ? shift(@ARGV) : "/tmp";
2.shift函數(shù):
移出第一個數(shù)組元素,并返回.
3.defined函數(shù):
??? 判斷一個變量、數(shù)組或數(shù)組的一個元素是否已經(jīng)被賦值。expr為變量名、數(shù)組名或一個數(shù)組元素。如果已定義，返回真，否則返回假。
4. if和unless
??? 注:if和unless意思相反!
?$a = $b if $a; ??? #如果$a為真$a賦值為$b
?$a = $b unless $a? #如果$a為假$a賦值為$b