Perl 若A则B判断的表示方法

Perl提供了另外一个“若A则B”的表示方法。可以在一般的if语句中加上修饰语,即把条件表达式放在后面,比如:

some_statements if condition;

以这个语句为例,若condition为真,则执行some_statements部分。这样的写法与下面的写法相同:

if(condition){
  some_statements;
}

下面是一些类似的用法:

expression unless condition;  ##类似unless(condition){ expression };
expression while condition; ##类似 while(condition) { expression };
expression until condition; ##类似 until(condition) { expression };

上面这些语句都将先执行 condition,使其真假决定是否执行 expression。

修饰语必须是简单表达式,不能是语句代码块。

虽然条件判断写在后面,但却是先执行。

另外两种“若A则B”的表示方法:

this && that;

this || that;

示例:

#!/usr/bin/perl  -w
@a = (97..122);
@b = ('a'..'z');
@a == @b && print("They are equal\n");
@a == @b || print("They are not equal\n");

程序的逻辑关系如下:
表@a等于列表@b,则第三条语句前部分为真,继续执行&&后面的语句,输出“They are equal”;第四条语句,因为前面为真,不在执行||后面的语句。
表@a不等于列表@b,则第三条语句前部分为假,因此不再执行&&后面的语句;第四条语句,因为前面为假,所以还需要执行后面的语句,输出“They are not equal”;

Perl 获取cpu使用率

Perl中pop与push函数

【Perl脚本】找出日志中的错误信息并发送邮件

用Perl 从MySQL取出数据做统计分析代码

Perl语言入门 第六版中文清晰PDF 

Perl 的详细介绍请点这里
Perl 的下载地址请点这里

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:https://www.heiqu.com/47398f257f256013f1211ad97d98f89f.html