Stavek if v jeziku Perl se uporablja za izvajanje operacije na podlagi pogoja. Z uporabo izjave if-else lahko izvedete operacijo, ne glede na to, ali je pogoj resničen ali napačen. Perl podpira različne vrste izjav if:

• če
• Če potem
• Če drugače - če

Perl Če Primer

Izjava Perl single if se uporablja za izvedbo kode, če je pogoj resničen. Sintaksa stavka if je podana spodaj:

 if(expression){ //code to be executed } 

Diagram poteka stavka if v Perlu

Oglejmo si preprost primer stavka if jezika Perl.

 $a = 10; if( $a %2==0 ){ printf 'Even Number
'; } } 

Izhod:

 Even Number 

Tukaj je izhod sodo število, saj smo vnesli 10.

Perl If-else primer

Stavek Perl if-else se uporablja za izvajanje kode, če je pogoj resničen ali napačen. Sintaksa stavka if-else je podana spodaj:

 if(expression){ //code to be executed if condition is true }else{ //code to be executed if condition is false } 

Diagram poteka stavka if-else v Perlu

Oglejmo si preprost primer sodega in lihega števila z uporabo stavka if-else v jeziku Perl.

 $a = 10; if( $a %2==0 ){ printf 'Even Number
'; }else{ printf 'Odd Number
'; } 

Izhod:

 Even Number 

Tukaj je vhod sodo število in zato je izhod sod.

Perl If-else Primer z vnosom uporabnika

V tem primeru bomo vzeli vnos od uporabnika s standardnim vnosom (/).

 print 'Enter a Number?
'; $num = ; if( $num %2==0 ){ printf 'Even Number
'; }else{ printf 'Odd Number
'; } 

Izhod:

 Enter a Number? 5 Odd Number 

 Enter a Number? 4 Even Number 

V prvi izhod je uporabnik vnesel številko 5, ki je liha. Zato je rezultat nenavaden.

V drugem izhodu je uporabnik vnesel številko 4, ki je soda. Zato je izhod enakomeren.

Perl If else-if Primer

Stavek Perl if else-if izvede eno kodo iz več pogojev. Sintaksa stavka if else-if je podana spodaj:

 if(condition1){ //code to be executed if condition1 is true }else if(condition2){ //code to be executed if condition2 is true } else if(condition3){ //code to be executed if condition3 is true } ... else{ //code to be executed if all the conditions are false } 

Diagram poteka stavka if else-if v Perlu

Spodaj je podan primer stavka if else-if v jeziku Perl.

 print 'Enter a Number to check grade
'; $num = ; if( $num 100){ printf 'Wrong Number
&apos;; }elsif($num &gt;= 0 &amp;&amp; $num = 0 &amp;&amp; $num = 60 &amp;&amp; $num = 70 &amp;&amp; $num = 80 &amp;&amp; $num = 90 &amp;&amp; $num <= 100){ printf 'a+ grade
'; } < pre> <p>Output:</p> <pre> Enter a Number to check grade 66 C Grade </pre> <pre> Enter a Number to check grade 2 Wrong Number </pre></=>

 Enter a Number to check grade 2 Wrong Number