perl的if else判断

perl的if及else判断,纯笔记.

#!/usr/bin/perl
$a=1;
$b=2;
if($b>$a){
   print '$b gt $a'."\n"
}else{
   print '$b is not gt $a'."\n"
}

任何标量都可以是if控制结构里的判断条件!

#!/usr/bin/perl
$a=1;
$b=2;
$RE=$b gt $a;
if($RE){
   print "ture\n"
}else{
   print "failed\n"
}

如果$b大于$a,$RE为真值,输出true. 不else也可以继续if

#!/usr/bin/perl
$a=2;
$b=2;
$RE=$b gt $a;
if($RE){
   print "ture\n"
}
#}else{
#   print "failed\n"
#}
if(!$RE){
   print "failed\n"
}