11、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: DDKK.COM 弟弟快看,程序员编程资料站(www.ddkk.com)

  Copyright © 2015-2065 www.ddkk.com. All rights reserved.

=cut
$name = "DDKK.COM 弟弟快看,程序员编程资料站";
$scope = 99.9;     #  喜欢数

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

print "$name - $status\n";

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

$ perl main.pl
DDKK.COM 弟弟快看,程序员编程资料站 - 热门网站