Perl選擇性控制結(jié)構(gòu)的指令有哪些

這篇文章給大家分享的是有關(guān)Perl選擇性控制結(jié)構(gòu)的指令有哪些的內(nèi)容。小編覺得挺實用的，因此分享給大家做個參考，一起跟隨小編過來看看吧。

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

選擇性控制結(jié)構(gòu)包括if和unless語句，類似于C語言中的if。

首先介紹一下真和假的定義。在Perl中，這些規(guī)則有些難以理解?？刂票磉_(dá)式的值為空串或0時，則表達(dá)式為假，對于其它任何情況，表達(dá)式的值都為真。

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

指令:if假如

語法一:

if(判別運(yùn)算式)
{
表達(dá)式為真時的語句塊;
}

上個語法在Perl中也可以寫成:表達(dá)式為真時的語句塊if(判別運(yùn)算式);

范例:

print"請輸入您的分?jǐn)?shù)?\n";  $scorre=<STDIN>;#<STDIN>代表標(biāo)準(zhǔn)輸入,會讓使用者輸入一字符串  chop($score);#將$score***一個換行字符\n刪除掉  if($score>=60){   print"您的分?jǐn)?shù)及格了!\n";   }

也可以寫成:print"您的分?jǐn)?shù)及格了!\n"if($score>=60);

語法二:

if(判別運(yùn)算式一){
判別式一為真時的語句塊;

}else{
判別式一為假時的語句塊;

}

范例:

print"請輸入您的分?jǐn)?shù)?\n";  $scorre=<STDIN>;  chop($score);  if($score>=60)  {  print"您的分?jǐn)?shù)及格了!\n";  }  else{  print"您的分?jǐn)?shù)不及格!\n";  }

語法三:

if(判別運(yùn)算式一)
{

判別式一為真時的語句塊;

}elsif(判別運(yùn)算式二){

判別式二為真時的語句塊;

}elsif(判別運(yùn)算式三){

判別式三為真時的語句塊;

}else{

所有判別式為假時的語句塊;

}

范例:

print"請輸入您的分?jǐn)?shù)?\n";  $scorre=<STDIN>;  chop($score);  if($score>60)  {  print"您的分?jǐn)?shù)大于60分!\n";  }  elsif($score<60){  print"您的分?jǐn)?shù)小于60分!\n":  }  else{  print"您的分?jǐn)?shù)剛好是60分!\n";  }

指令:unless假如非

unless的含義就是說“如果判別式不為真，就執(zhí)行...”。

語法一:

unless(判別運(yùn)算式){

判別式為假時語句塊;

}

上個語法在Perl中也可以寫成:判別式為假時語句塊unless(判別運(yùn)算式);

范例:

print"請輸入您的分?jǐn)?shù)?\n";  $scorre=<STDIN>;#<STDIN>代表標(biāo)準(zhǔn)輸入,會讓使用者輸入一字符串  chop($score);#將$score***一個換行字符\n刪除掉  unless($score<60)  {  print"您的分?jǐn)?shù)及格了!\n";  }

也可以寫成:print"您的分?jǐn)?shù)及格了!\n"unless($score<60);

語法二:

unless(判別運(yùn)算式)
{

判別式為假時語句塊;

}else{

判別式為真時語句塊;

}

范例:

print"請輸入您的分?jǐn)?shù)?\n";  $scorre=<STDIN>;  chop($score);  unless($score<60)  {  print"您的分?jǐn)?shù)及格了!\n";  }  else{  print"您的分?jǐn)?shù)不及格!\n";  }

感謝各位的閱讀！關(guān)于“Perl選擇性控制結(jié)構(gòu)的指令有哪些”這篇文章就分享到這里了，希望以上內(nèi)容可以對大家有一定的幫助，讓大家可以學(xué)到更多知識，如果覺得文章不錯，可以把它分享出去讓更多的人看到吧！