Perl if語句用法實例解析
本文和大家重點討論一下Perl Perl if語句的概念,主要包括 Perl if語句和if/else語句兩罰部分內容,相信通過本文的學習你對Perl語句的用法一定會有深入的了解。下面請看本文的詳細介紹。
Perl if語句
1. if語句
在Perl if語句中,首先出現的是關鍵字if,然后是條件表達式,其次是位于花括號里的一個或多個語句組成的代碼塊。塊中的每個語句都以分號(;)結尾。
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";
- }
運行結果
[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語句關聯。
例
- #!/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";
- }
運行結果
[root@localhostjs]#./t1-11.html
Xmustbe5!
【編輯推薦】