Perl 教程 之 Perl 数组 12

Perl 数组

Perl 数组一个是存储标量值的列表变量，变量可以是不同类型。

特殊变量： $[

特殊变量 $[ 表示数组的第一索引值，一般都为 0 ，如果我们将 $[ 设置为 1，则数组的第一个索引值即为 1，第二个为 2，以此类推。实例如下：

实例

!/usr/bin/perl

定义数组

@sites = qw(google taobao baidu facebook);
print "网站: @sites\n";

设置数组的第一个索引为 1

$[ = 1;

print "\@sites[1]: $sites[1]\n";
print "\@sites[2]: $sites[2]\n";
执行以上程序，输出结果为：

网站: google taobao baidu facebook
@sites[1]: google
@sites[2]: taobao
一般情况我们不建议使用特殊变量 $[，在新版 Perl 中，该变量已废弃。