perl的if else判断

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

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

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

  1. #!/usr/bin/perl
  2. $a=1;
  3. $b=2;
  4. $RE=$b gt $a;
  5. if($RE){
  6.    print "ture\n"
  7. }else{
  8.    print "failed\n"
  9. }

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

  1. #!/usr/bin/perl
  2. $a=2;
  3. $b=2;
  4. $RE=$b gt $a;
  5. if($RE){
  6.    print "ture\n"
  7. }
  8. #}else{
  9. #   print "failed\n"
  10. #}
  11. if(!$RE){
  12.    print "failed\n"
  13. }

强帖留名: