Perl 条件语句 - IF...ELSE
Perl 条件语句有助于做出决策，这要求程序员指定一个或多个要由程序评估或测试的条件，以及如果确定条件为真则要执行的一个或多个语句，以及可选的其他 如果条件被确定为假，则要执行的语句。
以下是在大多数编程语言中发现的典型决策结构的一般来源 −
数字 0、字符串 '0' 和 "" 、empty list () 和 undef 在布尔上下文中都是 false，所有其他值都是 true。 ! 或 not 对真值的否定返回一个特殊的假值。
Perl 编程语言提供以下类型的条件语句。
| 序号 | 语句 & 描述 |
|---|---|
| 1 | if 语句
if 语句 由一个布尔表达式和一个或多个语句组成。 |
| 2 | if...else 语句
if 语句 后面可以跟一个可选的else 语句。 |
| 3 | if...elsif...else 语句
if 语句 后面可以跟一个可选的elsif 语句，然后是一个可选的else 语句。 |
| 4 | unless 语句
unless 语句 由一个布尔表达式和一个或多个语句组成。 |
| 5 | unless...else 语句
unless 语句 后面可以跟一个可选的else 语句。 |
| 6 | unless...elsif..else 语句
unless 语句 后面可以跟一个可选的elsif 语句，然后是一个可选的else 语句。 |
| 7 | switch 语句
在最新版本的 Perl 中，您可以使用 switch 语句。 它允许一种简单的方法将变量值与各种条件进行比较。 |
? : 运算符
让我们检查一下条件运算符? : 可用于替换 if...else 语句。 它具有以下一般形式 −
Exp1 ? Exp2 : Exp3;
其中 Exp1、Exp2 和 Exp3 是表达式。 注意冒号的使用和位置。
a 的值? 表达式是这样确定的：计算 Exp1。 如果为真，则评估 Exp2 并成为整个 ? 表达。 如果 Exp1 为假，则计算 Exp3 并将其值变为表达式的值。 下面是一个使用此运算符的简单示例 −
#!/usr/local/bin/perl $name = "Ali"; $age = 10; $status = ($age > 60 )? "A senior citizen" : "Not a senior citizen"; print "$name is - $status\n";
这将产生以下结果 −
Ali is - Not a senior citizen
