Príkaz if v jazyku Perl sa používa na vykonanie operácie na základe podmienky. Pomocou príkazu if-else môžete vykonať operáciu, či už je podmienka pravdivá alebo nepravdivá. Perl podporuje rôzne typy príkazov if:
- Ak
- Ak-inak
- Ak inak-ak
Príklad Perl If
Na vykonanie kódu, ak je podmienka pravdivá, sa používa príkaz single if v jazyku Perl. Syntax príkazu if je uvedená nižšie:
if(expression){ //code to be executed }
Vývojový diagram príkazu if v jazyku Perl
Pozrime sa na jednoduchý príklad príkazu if v jazyku Perl.
$a = 10; if( $a %2==0 ){ printf 'Even Number '; } }
Výkon:
Even Number
Tu je výstupom párne číslo, pretože sme zadali vstup ako 10.
Perl If-else Príklad
Perlský príkaz if-else sa používa na vykonanie kódu, ak je podmienka pravdivá alebo nepravdivá. Syntax príkazu if-else je uvedená nižšie:
if(expression){ //code to be executed if condition is true }else{ //code to be executed if condition is false }
Vývojový diagram príkazu if-else v jazyku Perl
Pozrime sa na jednoduchý príklad párneho a nepárneho čísla pomocou príkazu if-else v jazyku Perl.
$a = 10; if( $a %2==0 ){ printf 'Even Number '; }else{ printf 'Odd Number '; }
Výkon:
Even Number
Vstup je tu párne číslo a teda výstup je párny.
Perl If-else Príklad so vstupom od užívateľa
V tomto príklade prevezmeme vstup od používateľa pomocou štandardného vstupu (/).
print 'Enter a Number? '; $num = ; if( $num %2==0 ){ printf 'Even Number '; }else{ printf 'Odd Number '; }
Výkon:
Enter a Number? 5 Odd Number
Enter a Number? 4 Even Number
V prvom výstupe používateľ zadal číslo 5, ktoré je nepárne. Výstup je teda nepárny.
V druhom výstupe užívateľ zadal číslo 4, ktoré je párne. Výstup je teda rovnomerný.
Perl If else-if Príklad
Príkaz Perl if else-if vykoná jeden kód z viacerých podmienok. Syntax príkazu if else-if je uvedená nižšie:
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 }
Vývojový diagram príkazu if else-if v jazyku Perl
Príklad príkazu if else-if v jazyku Perl je uvedený nižšie.
print 'Enter a Number to check grade '; $num = ; if( $num 100){ printf 'Wrong Number '; }elsif($num >= 0 && $num = 0 && $num = 60 && $num = 70 && $num = 80 && $num = 90 && $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=>