[Perl] 숫자비교연산자

Perl에서 두 숫자를 비교할 때 사용하는 비교연산자는 아래와 같다

 

== 동일하다

!= 동일하지 않다

< 보다 작다

> 보다 크다

<= 작거나 같다

>= 크거나 같다

 

아래와 같이 코드를 써보았다

 

print "Guess the number that I am thinking : ";
chomp ($a=<>);
if ($a==1){
    print "Right! How did you know?\n";
}elsif ($a>=10){
    print "Try smaller one.\n";
}elsif ($a<10){
    print "Nope, you will never know.\n";
}