(一)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 从未被初始化一样。
|
请发表评论