Perl 条件语句 - IF...ELSE

Perl 条件语句有助于做出决策,这要求程序员指定一个或多个要由程序评估或测试的条件,以及如果确定条件为真则要执行的一个或多个语句,以及可选的其他 如果条件被确定为假,则要执行的语句。

以下是在大多数编程语言中发现的典型决策结构的一般来源 −

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