La instrucció if en llenguatge Perl s'utilitza per realitzar operacions en funció de la condició. Mitjançant l'ús de la instrucció if-else, podeu realitzar l'operació que la condició sigui vertadera o falsa. Perl admet diversos tipus de declaracions if:

• Si
• Si una altra cosa
• Si més-si

Perl If Exemple

La sentència if single de Perl s'utilitza per executar el codi si la condició és certa. La sintaxi de la instrucció if es dóna a continuació:

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

Diagrama de flux de la sentència if en Perl

Vegem un exemple senzill de la instrucció if del llenguatge Perl.

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

Sortida:

 Even Number 

Aquí, la sortida és un nombre parell, ja que hem donat l'entrada com a 10.

Perl If-else Exemple

La sentència if-else de Perl s'utilitza per executar un codi si la condició és vertadera o falsa. La sintaxi de la sentència if-else es mostra a continuació:

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

Diagrama de flux de la sentència if-else en Perl

Vegem l'exemple senzill de nombre parell i senar amb la declaració if-else en llenguatge Perl.

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

Sortida:

 Even Number 

Aquí, l'entrada és un nombre parell i, per tant, la sortida és parell.

Exemple de Perl If-else amb entrada de l'usuari

En aquest exemple, agafarem l'entrada de l'usuari mitjançant l'entrada estàndard (/).

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

Sortida:

 Enter a Number? 5 Odd Number 

 Enter a Number? 4 Even Number 

A la primera sortida, l'usuari ha introduït el número 5 que és senar. Per tant, la sortida és estranya.

A la segona sortida, l'usuari ha introduït el número 4 que és parell. Per tant, la sortida és uniforme.

Perl If else-if Exemple

La sentència if else-if de Perl executa un codi a partir de diverses condicions. La sintaxi de la sentència if else-if es mostra a continuació:

 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 } 

Diagrama de flux de la sentència if else-if en Perl

A continuació es mostra l'exemple de la declaració if else-if en llenguatge 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