17、Perl编程基础：参数处理、变量定义、排序与循环

Perl编程基础：参数处理、变量定义、排序与循环

1. 脚本参数处理

在编写脚本时，常常需要对传入的参数进行检查。例如，若脚本需要且仅需要两个参数，可通过检查@ARGV数组的长度来实现：

if (scalar(@ARGV) != 2) { die "This script requires exactly two arguments.\n"; }

这里使用scalar(@ARGV)在标量上下文中计算数组@ARGV的元素个数。若数组长度不等于2，脚本将使用die()函数终止并给出错误信息。

同时，还可以检查参数的值是否在合理范围内。例如，对于纬度和经度坐标的检查：

# 假设代码在第9 - 14行进行检查 if ($lat < -90 || $lat > 90 || $lon < -180 || $lon > 180) { die "Latitude should be in range [-90, 90] and longitude in range [-180, 180].\n"; }

若坐标值不在合理范围内，脚本会终止并告知用户预期的值范围。

此外，我们可以编写一个脚本，用于统计命令行指定的参数数量，且要求至少指定三个参数：