Perl 中的`if`语句

原文： https://beginnersbook.com/2017/02/if-statement-in-perl/

if语句包含条件，后跟一个语句或一组语句，如下所示：

if(condition){
  Statement(s);
}

只有在给定条件为真时才会执行语句。如果条件为false，那么if语句体内的语句将被完全忽略。

例：

在以下示例中，我们将一个整数值赋给变量num。使用if语句，我们检查分配给num的值是否小于 100。

#!/usr/local/bin/perl
printf "Enter any number:";
$num = <STDIN>;
if( $num < 100 ){
   # This print statement would execute,
   # if the above condition is true
   printf "num is less than 100\n";
}

输出：

Enter any number:78
num is less than 100

perl 中的嵌套if语句

当在另一个if语句中有if语句时，它将被称为嵌套if语句。
嵌套的结构如下所示：

if(condition_1) {
   Statement1(s);
   if(condition_2) {
      Statement2(s);
   }
}

如果condition_1为true，则执行Statement1。只有条件（condition_1和condition_2）都为真时，Statement2才会执行。

示例：

#!/usr/local/bin/perl
printf "Enter any number: ";
$num = <STDIN>;
if( $num < 100 ){
   printf "num is less than 100\n";
   if( $num > 90 ){
      printf "num is greater than 90\n";
   }
}

输出：

Enter any number: 99
num is less than 100
num is greater than 90