2、掌握Perl控制流构造：构建灵活高效的脚本

掌握Perl控制流构造：构建灵活高效的脚本

1. 条件判断：if语句

在编程中，条件判断是控制程序执行路径的重要工具。Perl提供了 if 语句来实现这一功能。 if 语句的基本语法如下：

if (condition) {
    # statements
}

需要注意的是，大括号 {} 是必须的，即使主体只有一行代码。例如，如果你想除以一个数字，但要确保这个数字不是0，可以这样写：

if ($number != 0) {
    $result = 100 / $number;
}

示例程序

让我们创建一个简单的程序来演示 if 语句的使用。这个程序会提示用户输入一个数字，如果这个数字不是0，它会计算100除以这个数字的结果，并将结果存储在 $result 中；如果数字是0，结果将保持为默认值0。

#!/usr/bin/perl
use warnings;
use strict;

print "please enter a number:";
chomp(my $number = <STDIN>);
my $result = 0;
if ($number != 0) {
    $result = 100 / $number;