Perl学习笔记(3)

1。 以@开头的变量为列表变量。给一个变量赋值，如下：

@arr =(‘abs’, ‘test’, ‘wang’);

空列表不包含元素，定义如下：@empty = ();

2.取列表特定的值：

$element = @arr(2);

Perl中列表计数是从0开始的，因此上述语句为取列表@arr中第三个值。

使用方括号（[和]）可以取列表的一个片段（连续的部分）。如果这个片段只有一个元素，那该部分就是
一个标量片段，该列表变量必须将@改为$。使用方法如下：

@arr =(‘abs’, ‘test’, ‘wang’);

print $arr[1];     # 输出为: test

列表片段可以包含多个元素，也就是说列表的片段也是列表，因此取值时应该使用以@开头的方式。

@two = @arr[0,1];  # 输出为: abstest

$#arrayname是列表最后一个元素的序号，因此在Perl中我们可以很容易确定列表的元素个数。

3.操作列表的函数：

push和unshift，push把一个或多个元素添加到列表的尾部。而unshift将元素添加到列表的头部。
使用方式如下：

push(@dest, @scr);

push(@dest, $scr);

unshift(@dest, @scr);

unshift(@dest, $scr);

pop和shift操作函数。pop用于从列表尾部删除一个值，shift用于从列表的头部删除一个值。这两个函数
都返回被删除的值。方式如下：

pop @array;  shift @array;

splice函数，用于对列表的任意位置添加和删除元素。该函数有四个参数，返回被删除的元素或者列表。

参数为: 列表名称，开始位置，删除个数，要插入的元素列表

@number = （1, 2, 3, 4, 5）;

splice(@number, 3, 1, (9, 10));

结果：(1, 2, 3, 9, 10, 5)

如果不删除元素，仅仅时添加元素，将第三个参数设置为0即可。

如果仅仅时删除元素，则可以省去第四个参数。如：

splice(@number, 3, 1);

列表中还可以使用x运算符和..，..用于表示一个范围，使用方法如下：

(2..6)表示(2, 3, 4, 5, 6)

4.应用已有列表。

定义新列表时，可以使用已经有的列表，如：

@a = (1, 2, 3);

@b = (4, @a);      # @b为(4, 1, 2, 3)

5.scalar用于强制转化为标量。例如：scalar(@a)输出@a的元素个数。