解析Perl选择性控制结构的两大指令

本文和大家重点讨论一下Perl选择性控制结构的概念，Perl选择性控制结构包括if和unless语句，类似于C语言中的if。在Perl中，这些规则有些难以理解。控制表达式的值为空串或0时，则表达式为假，对于其它任何情况，表达式的值都为真。

成都创新互联公司专业为企业提供屯昌网站建设、屯昌做网站、屯昌网站设计、屯昌网站制作等企业网站建设、网页设计与制作、屯昌企业网站模板建站服务，十多年屯昌做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

Perl选择性控制结构

选择性控制结构包括if和unless语句，类似于C语言中的if。

首先介绍一下真和假的定义。在Perl中，这些规则有些难以理解。控制表达式的值为空串或0时，则表达式为假，对于其它任何情况，表达式的值都为真。

注意："00"不是空串或0，值为真。"0.0"也是如此。

指令:if假如

语法一:

if(判别运算式)
{
表达式为真时的语句块;
}

上个语法在Perl中也可以写成:表达式为真时的语句块if(判别运算式);

范例:

 
 
 

  
  
  
print"请输入您的分数?\n";  
  
  
  
$scorre=;#代表标准输入,会让使用者输入一字符串  
  
  
  
chop($score);#将$score***一个换行字符\n删除掉  
  
  
  
if($score>=60){  
  
  
  
 
  
  
  
print"您的分数及格了!\n";  
  
  
  
 
  
  
  
}  
  
  
  
 
 
 
 

 也可以写成:print"您的分数及格了!\n"if($score>=60);

语法二:

if(判别运算式一){
判别式一为真时的语句块;

}else{
判别式一为假时的语句块;

}

范例:

 
 
 

  
  
  
print"请输入您的分数?\n";  
  
  
  
$scorre=;  
  
  
  
chop($score);  
  
  
  
if($score>=60)  
  
  
  
{  
  
  
  
print"您的分数及格了!\n";  
  
  
  
}  
  
  
  
else{  
  
  
  
print"您的分数不及格!\n";  
  
  
  
}  
  
  
  
 
 
 
 

语法三:

if(判别运算式一)
{

判别式一为真时的语句块;

}elsif(判别运算式二){

判别式二为真时的语句块;

}elsif(判别运算式三){

判别式三为真时的语句块;

}else{

所有判别式为假时的语句块;

}

范例:

 
 
 

  
  
  
print"请输入您的分数?\n";  
  
  
  
$scorre=;  
  
  
  
chop($score);  
  
  
  
if($score>60)  
  
  
  
{  
  
  
  
print"您的分数大于60分!\n";  
  
  
  
}  
  
  
  
elsif($score<60){  
  
  
  
print"您的分数小于60分!\n":  
  
  
  
}  
  
  
  
else{  
  
  
  
print"您的分数刚好是60分!\n";  
  
  
  
}  
  
  
  
 
 
 
 

#p#

 指令:unless假如非

unless的含义就是说“如果判别式不为真，就执行...”。

语法一:

unless(判别运算式){

判别式为假时语句块;

}

上个语法在Perl中也可以写成:判别式为假时语句块unless(判别运算式);

范例:

 
 
 

  
  
  
print"请输入您的分数?\n";  
  
  
  
$scorre=;#代表标准输入,会让使用者输入一字符串  
  
  
  
chop($score);#将$score***一个换行字符\n删除掉  
  
  
  
unless($score<60)  
  
  
  
{  
  
  
  
print"您的分数及格了!\n";  
  
  
  
}  
  
  
  
 
 
 
 

也可以写成:print"您的分数及格了!\n"unless($score<60);

语法二:

unless(判别运算式)
{

判别式为假时语句块;

}else{

判别式为真时语句块;

}

范例:

 
 
 

  
  
  
print"请输入您的分数?\n";  
  
  
  
$scorre=;  
  
  
  
chop($score);  
  
  
  
unless($score<60)  
  
  
  
{  
  
  
  
print"您的分数及格了!\n";  
  
  
  
}  
  
  
  
else{  
  
  
  
print"您的分数不及格!\n";  
  
  
  
}  
 
 
 

 【编辑推荐】

1. Perl基础 Perl复杂数据结构
2. Perl print命令使用时遇到的两个问题
3. 使用 Perl 增强 Twitter 实用性
4. 揭秘Perl变量中Perl纯变量用法
5. Perl变量中Perl数组概念详解

分享题目：解析Perl选择性控制结构的两大指令
URL链接：http://www.csdahua.cn/qtweb/news43/397193.html

网站建设、网络推广公司-快上网，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 快上网