条件语句

Perl 支持多种条件语句（基于布尔结果的语句）。最常见的条件语句是 if-else，除非和三元语句。given 语句是作为类似开关的构造从 C 衍生语言引入的，可用于 Perl 5.10 及更高版本。

If-Else 语句

if 语句的基本结构如下：

if (EXPR) BLOCK
if (EXPR) BLOCK else BLOCK
if (EXPR) BLOCK elsif (EXPR) BLOCK ...
if (EXPR) BLOCK elsif (EXPR) BLOCK ... else BLOCK

对于简单的 if 语句，if 可以在要执行的代码之前或之后。

$number = 7;
if ($number > 4) { print "$number is greater than four!"; }

# Can also be written this way
print "$number is greater than four!" if $number > 4;