Perl if语句用法实例解析

开发 架构
Perl if语句的用法你是否了解,这里通过实例向大家介绍一下,希望通过本文的介绍你对Perl if语句的用法有明确的认识。

本文和大家重点讨论一下Perl Perl if语句的概念,主要包括 Perl if语句和if/else语句两罚部分内容,相信通过本文的学习你对Perl语句的用法一定会有深入的了解。下面请看本文的详细介绍。

Perl if语句 

1. if语句

在Perl if语句中,首先出现的是关键字if,然后是条件表达式,其次是位于花括号里的一个或多个语句组成的代码块。块中的每个语句都以分号(;)结尾。
if(conditional_statment){codetoexecute;}

  1. #!/usr/bin/perl  
  2. $x=7;  
  3. $y=7;  
  4.  
  5. #TESTING...ONE,TWO...TESTING  
  6. if($x==7){  
  7. print'$xisequalto7!';  
  8. print"\n";  
  9. }  
  10. if(($x==7)||($y==7)){  
  11. print'$xor$yisequalto7!';  
  12. print"\n";  
  13. }  
  14. if(($x==7)&&($y==7)){  
  15. print'$xand$yareequalto7!';  
  16. print"\n";  
  17. }  
  18.  

 运行结果
[root@localhostjs]#./t1-10.html
$xisequalto7!
$xor$yisequalto7!
$xand$yareequalto7!

2.if/else语句

该结构支持双路选择。如果if后面***个表达式为真,就执行if后面的语句;否则,执行else后面的语句。Else不能作为独立语句而存在,它必须跟随在Perl if语句之后。如果Perl if语句嵌入到其它Perl if语句中的话,else语句将与前面最近的Perl if语句关联。

  1. #!/usr/bin/perl  
  2. $x=5;  
  3. #PLAYTHEGUESSINGGAME  
  4. if($x==6){  
  5. print"Xmustbe6.";  
  6. print"\n";  
  7. }  
  8. elsif($x==4){  
  9. print"Xmustbe4.";  
  10. print"\n";  
  11. }  
  12. elsif($x==5){  
  13. print"Xmustbe5!";  
  14. print"\n";  
  15. }  
  16.  

 运行结果

[root@localhostjs]#./t1-11.html
Xmustbe5!

【编辑推荐】

 

  1. 深入学习Perl运算符用法
  2. Perl文件句柄概念详解
  3. 解析四大Perl操作符用法
  4. 专家推荐 几款常用Perl开发工具
  5. 学习笔记 Perl数字与字符串间的自动转换


 

责任编辑:佚名 来源: csdn.net
相关推荐

2010-07-20 09:45:04

Perl继承

2010-07-15 15:54:10

Perl守护进程

2010-07-23 13:46:27

Perl语言

2010-07-13 13:49:43

Perl foreac

2010-07-15 10:22:23

Perl控制结构

2010-07-19 14:13:41

Perl函数

2010-07-16 16:56:01

Perl构造函数

2010-07-20 15:02:20

Perl数组

2010-07-16 13:10:36

Perl哈希表

2010-07-14 15:32:21

Perl转义字符

2010-07-21 13:59:59

Perl引用

2010-07-19 14:37:01

Perl进程启动函数

2010-07-15 10:47:22

Perl命令行

2010-07-26 15:17:51

Perl解析XML文件

2010-07-14 12:39:30

Prel字符串

2010-07-13 09:23:00

Perl变量

2010-07-19 14:20:57

Perl函数

2010-07-16 13:45:41

Perl引用

2010-07-14 15:51:30

Perl 字符匹配

2010-07-26 14:06:43

Perl substr
点赞
收藏

51CTO技术栈公众号