Оператор if у мові Perl використовується для виконання операції на основі умови. Використовуючи оператор if-else, ви можете виконувати операцію, якщо умова є істинною чи хибною. Perl підтримує різні типи операторів if:

• Якщо
• Якщо-інакше
• Якщо інакше-якщо

Приклад Perl If

Інструкція Perl single if використовується для виконання коду, якщо умова виконується. Синтаксис оператора if наведено нижче:

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

Блок-схема оператора if у Perl

Давайте розглянемо простий приклад оператора if мови Perl.

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

Вихід:

 Even Number 

Тут вихід є парним числом, оскільки ми ввели 10.

Приклад Perl If-else

Інструкція Perl if-else використовується для виконання коду, якщо умова є істинною або хибною. Синтаксис оператора if-else наведено нижче:

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

Блок-схема оператора if-else у Perl

Давайте розглянемо простий приклад парних і непарних чисел за допомогою оператора if-else мовою Perl.

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

Вихід:

 Even Number 

Тут вхід є парним числом, а отже вихід парним.

Приклад Perl If-else із введенням від користувача

У цьому прикладі ми будемо приймати дані від користувача за допомогою стандартного введення (/).

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

Вихід:

 Enter a Number? 5 Odd Number 

 Enter a Number? 4 Even Number 

У першому виході користувач ввів число 5, яке є непарним. Тому вихід непарний.

У другому виході користувач ввів число 4, яке є парним. Отже, вихід є парним.

Perl If else-if Приклад

Інструкція Perl if else-if виконує один код із кількох умов. Синтаксис оператора if else-if наведено нижче:

 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 } 

Блок-схема оператора if else-if у Perl

Приклад оператора if else-if мовою 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