Merhaba arkadaşlar Bugünkü videoda Perl ile Operatörlerin kullanımdan Bahsettik..Video da Kullandığım Materyaller Aşşağıdadır..




Operatörler

Kod:
 
Kod:
eL.Security..
Kod:

< Küçük


> Büyük


== Eşit


<= Küçük veya eşit


>= Büyük veya eşit


!= Eşit değil


<=> Kıyaslama dönüşü 1, 0, veya-1


Operatör Kullanımları <,> operatörleri

Kod:
 
Kod:
#!usr/local/bin/perl
Kod:
print("Lutfen Bir Sayi Giriniz \n");
$sayi1 = <STDIN>;
chop ($sayi1);
print("Lutfen ikinci Sayiyi Giriniz \n");
$sayi2 = <STDIN>;
chop ($sayi2);


if ($sayi1 < $sayi2)
{
	print("Birinci sayi ikinci sayidan kucuk");
}


elsif ($sayi1 > $sayi2)
{
	print("Birinci sayi ikinci sayidan buyuk");
}