$[ Perl 中的特殊变量
Perl 提供许多具有预定义含义的特殊变量。
我们有一个特殊变量,写为 $[。此特殊变量是一个标量,包含所有数组的第一个索引。由于 Perl 数组基于零的索引,因此 [几乎总是0。但是,如果您将[ 设置为 1,则所有数组将使用基于一的索引。建议不要使用除零之外的任何其他索引。不过,我们举一个示例来说明 $[ 变量的使用方式 −
示例
#!/usr/bin/perl # define an array @foods = qw(pizza steak chicken burgers); print "Foods: @foods\n"; # Let's reset first index of all the arrays. $[ = 1; print "Food at \@foods[1]: $foods[1]\n"; print "Food at \@foods[2]: $foods[2]\n";
输出
这将产生以下结果 −
Foods: pizza steak chicken burgers Food at @foods[1]: pizza Food at @foods[2]: steak
广告