TechCodeview

ההצהרה if בשפת Perl משמשת לביצוע פעולה על בסיס תנאי. על ידי שימוש במשפט if-else, אתה יכול לבצע פעולה בין אם התנאי הוא אמת או שקר. Perl תומך בסוגים שונים של הצהרות if:

• אם
• אחרת
• אם אחר-אם

פרל אם דוגמה

הצהרת Perl single if משמשת לביצוע הקוד אם התנאי הוא אמת. התחביר של הצהרת if ניתן להלן:

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

תרשים זרימה של הצהרת if בפרל

בואו נראה דוגמה פשוטה של ​​הצהרת Perl if.

 $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 מבצעת קוד אחד ממספר תנאים. התחביר של הצהרת 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