自拍偷在线精品自拍偷,亚洲欧美中文日韩v在线观看不卡

Perl if語句用法實(shí)例解析

開發(fā) 架構(gòu)
Perl if語句的用法你是否了解,這里通過實(shí)例向大家介紹一下,希望通過本文的介紹你對(duì)Perl if語句的用法有明確的認(rèn)識(shí)。

本文和大家重點(diǎn)討論一下Perl Perl if語句的概念,主要包括 Perl if語句和if/else語句兩罰部分內(nèi)容,相信通過本文的學(xué)習(xí)你對(duì)Perl語句的用法一定會(huì)有深入的了解。下面請(qǐng)看本文的詳細(xì)介紹。

Perl if語句 

1. if語句

在Perl if語句中,首先出現(xiàn)的是關(guān)鍵字if,然后是條件表達(dá)式,其次是位于花括號(hào)里的一個(gè)或多個(gè)語句組成的代碼塊。塊中的每個(gè)語句都以分號(hào)(;)結(jié)尾。
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.  

 運(yùn)行結(jié)果
[root@localhostjs]#./t1-10.html
$xisequalto7!
$xor$yisequalto7!
$xand$yareequalto7!

2.if/else語句

該結(jié)構(gòu)支持雙路選擇。如果if后面***個(gè)表達(dá)式為真,就執(zhí)行if后面的語句;否則,執(zhí)行else后面的語句。Else不能作為獨(dú)立語句而存在,它必須跟隨在Perl if語句之后。如果Perl if語句嵌入到其它Perl if語句中的話,else語句將與前面最近的Perl if語句關(guān)聯(lián)。

  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.  

 運(yùn)行結(jié)果

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

【編輯推薦】

 

  1. 深入學(xué)習(xí)Perl運(yùn)算符用法
  2. Perl文件句柄概念詳解
  3. 解析四大Perl操作符用法
  4. 專家推薦 幾款常用Perl開發(fā)工具
  5. 學(xué)習(xí)筆記 Perl數(shù)字與字符串間的自動(dòng)轉(zhuǎn)換


 

責(zé)任編輯:佚名 來源: csdn.net
相關(guān)推薦

2010-07-20 09:45:04

Perl繼承

2010-07-15 15:54:10

Perl守護(hù)進(jìn)程

2010-07-23 13:46:27

Perl語言

2010-07-13 13:49:43

Perl foreac

2010-07-19 14:13:41

Perl函數(shù)

2010-07-15 10:22:23

Perl控制結(jié)構(gòu)

2010-07-16 16:56:01

Perl構(gòu)造函數(shù)

2010-07-14 15:32:21

Perl轉(zhuǎn)義字符

2010-07-16 13:10:36

Perl哈希表

2010-07-20 15:02:20

Perl數(shù)組

2010-07-21 13:59:59

Perl引用

2010-07-19 14:37:01

Perl進(jìn)程啟動(dòng)函數(shù)

2010-07-14 12:39:30

Prel字符串

2010-07-13 09:23:00

Perl變量

2010-07-15 10:47:22

Perl命令行

2010-07-26 15:17:51

Perl解析XML文件

2010-07-14 15:51:30

Perl 字符匹配

2010-07-26 14:06:43

Perl substr

2010-07-16 13:45:41

Perl引用

2010-07-19 14:20:57

Perl函數(shù)
點(diǎn)贊
收藏

51CTO技術(shù)棧公眾號(hào)