Perl dilinde if ifadesi koşul bazlı işlem gerçekleştirmek için kullanılır. If-else ifadesini kullanarak koşulun doğru veya yanlış olması işlemini gerçekleştirebilirsiniz. Perl çeşitli if ifadesi türlerini destekler:
- Eğer
- If-else
- Eğer else-if
Perl If Örnek
Koşul doğruysa kodu yürütmek için Perl single if ifadesi kullanılır. If ifadesinin sözdizimi aşağıda verilmiştir:
if(expression){ //code to be executed }
Perl'de if ifadesinin akış şeması
Perl dili if ifadesinin basit bir örneğini görelim.
$a = 10; if( $a %2==0 ){ printf 'Even Number '; } }
Çıktı:
Even Number
Burada girdiyi 10 olarak verdiğimiz için çıktı çift sayıdır.
Perl If-else Örneği
Perl if-else ifadesi, koşulun doğru veya yanlış olması durumunda kodu çalıştırmak için kullanılır. if-else ifadesinin sözdizimi aşağıda verilmiştir:
if(expression){ //code to be executed if condition is true }else{ //code to be executed if condition is false }
Perl'de if-else ifadesinin akış şeması
Perl dilinde if-else ifadesini kullanan çift ve tek sayıların basit örneğini görelim.
$a = 10; if( $a %2==0 ){ printf 'Even Number '; }else{ printf 'Odd Number '; }
Çıktı:
Even Number
Burada girdi çift sayı olduğundan çıktı da çifttir.
Kullanıcıdan Girilen Perl If-else Örneği
Bu örnekte standart girişi (/) kullanarak kullanıcıdan girdi alacağız.
print 'Enter a Number? '; $num = ; if( $num %2==0 ){ printf 'Even Number '; }else{ printf 'Odd Number '; }
Çıktı:
Enter a Number? 5 Odd Number
Enter a Number? 4 Even Number
İlk çıktıda kullanıcı tek sayı olan 5 sayısını girmiştir. Bu nedenle çıktı tuhaftır.
İkinci çıktıda kullanıcı çift sayı olan 4 sayısını girmiştir. Dolayısıyla çıktı eşittir.
Perl If else-if Örneği
Perl if else-if ifadesi birden fazla koşuldan bir kodu çalıştırır. if else-if ifadesinin sözdizimi aşağıda verilmiştir:
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 }
Perl'de if else-if ifadesinin akış şeması
Perl dilinde if else-if ifadesinin örneği aşağıda verilmiştir.
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=>