Perl 条件语句 - Perl 基础教程 - 简单教程，简单编程

Perl 条件语句是通过一条或多条语句的执行结果（ True 或者 False ）来决定执行的代码块

条件语句流程图

可以通过下图来简单了解条件语句的运行过程

条件语句中的真假值

数字 0, 字符串 '0' 、 "" , 空 list () , 和 undef 为 false
其他值均为 true
true 前面使用 ! 或 not 则返回 false

Perl 提供了下列的条件语句

语句	描述
if 语句	一个if 语句由一个布尔表达式后跟一个或多个语句组成
if...else 语句	一个if 语句后可跟一个可选的else 语句，else 语句在布尔表达式为假时执行
if...elsif...else 语句	您可以在一个if语句后可跟一个可选的elsif 语句，然后再跟另一个else 语句
unless 语句	一个unless 语句由一个布尔表达式后跟一个或多个语句组成
unless...else 语句	一个unless 语句后可跟一个可选的else 语句
unless...elsif..else	一个unless 语句后可跟一个可选的elsif 语句，然后再跟另一个else 语句
switch 语句	在最新版本的 Perl 中，我们可以使用switch语句。它根据不同的值执行对应的代码块

三元运算符 ? :

条件运算 ? : 可以用来简化 if...else 语句的操作

?: 条件语句的语法格式如下：

Exp1 ? Exp2 : Exp3;

如果 Exp1 表达式为 true ，则返回 Exp2 表达式计算结果，否则返回 Exp3。

#!/usr/bin/perl

=pod

  file: mail.pl
  author: 简单教程(www.twle.cn)

  Copyright © 2015-2065 www.twle.cn. All rights reserved.

=cut


$name = "简单编程";
$scope = 99.9;     #  喜欢数

$status = ($scope > 60 )? "热门网站" : "不是热门网站";

print "$name - $status\n";

运行以上范例，输出结果为:

$ perl main.pl
简单编程 - 热门网站