Perl语言入门

48

｜

第

2

章

print "'$name' does not come after 'fred'.\n";

print "Maybe it's the same string, in fact.\n";

}

条件语句中的语句块周围一定要加上表示边界的花括号，这点和

C

语言不同（不管你

有没有学过

C

）。建议将语句块内的内容向里缩排，使其视觉上成为一个整体，方便

阅读。如果用的是专为编程设计的文本编辑器（我们之前在第

1

章中提过），它一般

都会自动完成缩进。

布尔值

其实，任何标量值都可以成为

if

控制结构里的判断条件。如果把表达式返回的真假

值保存到变量中，那么在判断时可以直接检查该变量的值，可读性更强：

$is_bigger = $name gt 'fred';

if ($is_bigger) { ... }

但

Perl

是如何决断给定值的真假呢？和其他语言不同，

Perl

并没有专用的布尔

（

Boolean

）数据类型，它是靠一些简单的规则来判断的：

•

如果是数字，

0

为假；所有其他数字都为真。

•

如果是字符串，空字符串（

''

）以及字符串

'0'

都为假；所有其他字符串都为

真。

•

如果变量还未被赋值，那么返回假。

要取得相反的布尔值，可以用

!

这个单目取反操作符。若它后面的操作数为真，就返

回假；若后面的操作数为假，则返回真：

if (! $is_bigger) {

#

如果

$is_bigger

不为真，则执行这里的代码

}

这里还有一个小技巧，由于

!

会颠倒真假值，并且

Perl

又没有专门的布尔类型的变 ...