perl转载undef简介 defined函数简介

（一）undef简介

变量在第一次赋值前有一个特殊值undef，按照Perl来说就是： “这里什么也没有，请继续” 。如果这里的“什么也没有”是一些“数字” ，则表现为 0。如果是“字符串” ，则表现为空串。但undef 既非数字也非字符串，它是另一种标量类型。

由于undef 在需要数字的地方可以自动转化为 0，因此可以如下的写代码：

#!/usr/bin/perl

while($n<10){

$sum+=$n;

$n+=2;

}

print "The total was $sum.\n";

Output: The total was 20.

上述代码在$sum未初始化(undef)时也能正确执行。第一次执行时，循环体中第一行$n值为1，因此将1 加给$sum。而$sum就像已经有值0，因为$sum值为 undef。现在其值 1。之后，由于其已被初始化，其过程同普通的类似。

同样的，针对字符串的情形：$string.= “ moretext\n”;

如果$string为 undef；则是空串后接“ moretext \n” 。反之，则是其值后接 “ moretext\n” 。

Perl程序员在使用新变量时，经常不初始化，从而将变量作为0 或者空串使用。许多操作当参数不恰当时返回undef。如果没做特殊处理，通常会得到0 或者空串。实践中，这几乎不会有什么问题。实际上，许多程序员利用这种性质。但应当知道如果警告是打开的，那Perl 在你不恰当的使用未定义值时会提醒你。例如，将一个undef 的变量赋给另一个变量不会有什么问题，但如果print某个未定义的值则将引起警告。

（二）defined函数简介

能返回 undef 的操作之一是行输入操作，<STDIN>。通常，它会返回文本中的一行。但如果没有更多的输入，如到了文件的结尾，则返回undef。要分辨其是undef 还是空串，可以使用 defined函数，它将在为undef 时返回false，其余返回true。事实上，从键盘输入，不会有 “ end-of-file” ，但其可重定向到文件中再输入。或者用户可能输入某些键，而系统将其作为end-of-file看待。

比如：

#!/usr/bin/perl

$madonna=<STDIN>;

if(defined($madonna)){

print "The input was $madonna";

}else{

print "No input available!\n";

}

如果想声明自己的undef 值，可以使用undef：$madonna=undef; 同$madonna 从未被初始化一样。