Perl if語句用法實(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;}
例
- #!/usr/bin/perl
- $x=7;
- $y=7;
- #TESTING...ONE,TWO...TESTING
- if($x==7){
- print'$xisequalto7!';
- print"\n";
- }
- if(($x==7)||($y==7)){
- print'$xor$yisequalto7!';
- print"\n";
- }
- if(($x==7)&&($y==7)){
- print'$xand$yareequalto7!';
- print"\n";
- }
運(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)。
例
- #!/usr/bin/perl
- $x=5;
- #PLAYTHEGUESSINGGAME
- if($x==6){
- print"Xmustbe6.";
- print"\n";
- }
- elsif($x==4){
- print"Xmustbe4.";
- print"\n";
- }
- elsif($x==5){
- print"Xmustbe5!";
- print"\n";
- }
運(yùn)行結(jié)果
[root@localhostjs]#./t1-11.html
Xmustbe5!
【編輯推薦】
- 深入學(xué)習(xí)Perl運(yùn)算符用法
- Perl文件句柄概念詳解
- 解析四大Perl操作符用法
- 專家推薦 幾款常用Perl開發(fā)工具
- 學(xué)習(xí)筆記 Perl數(shù)字與字符串間的自動(dòng)轉(zhuǎn)換