17、Perl编程基础：参数检查、变量定义、排序与循环详解

Perl编程基础：参数检查、变量定义、排序与循环详解

1. 参数检查

在编写脚本时，常常需要确保传入的参数数量和值是正确的。例如，有一个脚本需要两个参数，我们可以通过检查@ARGV数组的长度来判断参数数量是否正确：

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

这里，scalar(@ARGV)是在标量上下文中对@ARGV数组进行求值，得到数组的元素个数。如果元素个数不等于 2，就使用die()函数终止脚本并输出错误信息。

此外，还需要检查参数的值是否在合理范围内。比如，对于经纬度坐标，需要确保其值在合理区间内：

my ($lat, $lon) = @ARGV; if ($lat < -90 || $lat > 90 || $lon < -180 || $lon > 180) { die "Invalid latitude or longitude. Latitude should be in [-90, 90] and longitude in [-180, 180].\n"; }

如果值不在合理范围内，同样使用die()函数终止脚本并告知用户预期的值