数组变量，列表直接量。

数组或者列表的每个元素都是单独的标量变量，拥有独立的标量值。可以存储不同类别的元素，但是不鼓励这样做。

访问数组中的元素

使用下标来引用数组元素，从0开始，依次加1，假如对索引值超过数组尾端的元素进行赋值，数组将会根据需要自动扩大，只要有可用的内存分配给Perl，数组的长度是没有上限的，如果在扩展过程中需要增补元素，那么它们的默认取值将是undef。

例如：

$rock[0]=”1”;

$rock[5]=”1”;#这里将有4个undef元素。

特殊的数组索引值

1.       数组中最后一个元素的索引值。对于我们正在使用的rock而言，最后一个的元素的索引值将是$#rock，那么访问数组中的最后一个元素将是rock[$#rock].

2.       负数数组索引值，假如你在数组中有3个元素，则有效的负数索引值为-1（最后一个元素），-2（倒数第二个元素）以及-3（倒数第三个元素，即第一个元素），并且使用-4会导致错误。

列表直接量

（1，2，3）

（“1”，2）

（1..100） #100个整数构成的列表，..范围操作符

（1.7..5.7）#小数点将会被去掉，同（1..5）

（0..$#rock）#数组里的全部元素

数组变量：

@array=1..5;

qw的应用：变态

列表的赋值

（$a,$b,$c）=（”1”,”2”,”3”）

因为列表是在赋值运算之前建立的，所以利用列表赋值进行交换两个变量的值相当容易。

（$a,$b）=（$b,$a）;

（$a,$b）=（”1”）; #$b将会被定义为undef

pop和push操作符

常把数组当作堆栈来使用，新增和删除的操作都做数组的索引值最高的那一端。

Pop操作符可用来取出数组中最后的一个元素，同时返回这个元素的值

@array=5..9;

$fred=pop(@array);#现在的array就是5..8,而fred是9;

如果数组是空的，那么将什么都不做，直接返回undef。

push操作符用于在数组的尾端添加一个元素（或者列表）

push(@array,0)

push(@array,1..10);

注：pop唯一的参数和push的第一个参数必须是数组变量，而不能是列表直接量

shift和unshift

与pop和push相反，shift和unshift处理的是数组的前端

操作一样，参考pop和push

字符串的数组内插

foreach控制结构

遍历数组和列表

Ex:

Foreeach $rock (qw/bedrock slate lava/){

   print “one rock is $rock.\n”;

}

控制变量即本例中的$rock并不是列表中元素的复制品，实际上它就是列表本身的元素，也就是说如果在循环中修改了控制变量的值，那么列表也将会被修改。

@rock=qw/ 1 2 3/

foreach $rock (@rock)

  $rock = 2;

print @rock; #rock=qw/ 2 2 2 /

Perl的老地方：$_(默认变量)

foreach(1..10)

{print $_;}

reverse操作符

@fred=6..10;

@fred_reverse=reverse(@fred); #10..6

sort操作符

sort操作符会将列表按照ASCII码的顺序进行排序：大写字母在小写字母的前面，数字在字母的前面，往后会有按照自己的规则尽心排序。

标量上下文与列表上下文

所谓上下文就是表达式所在的位置。在Perl解析表达式的时候，要么希望得到一个标量，要么希望得到一个列表。

42+something  #something是一个标量

sort something  #something是一个列表

perl中表达式的通常是根据上下文返回对应的值。以数组的“名称”为例，在列表的上下文中，它会产生列表，但是在标量的上下文中则会产生数组中元素的个数

@people=1..10;

sort @people; #列表上下文，产生列表1..10 

$num= 10+@people; #标量上下文，num为10+10=20

在标量上下文中使用产生列表的表达式

某些表达式不会在标量上下文返回任何值。例如sort在标量上下文中总是返回undef

再看reverse

@a= reverse qw/ abc nmc /;#a为nmc abc

$a=reverse qw/ abc nmc /;#a 为cmncba

常见的上下文：

$fred=something  #标量上下文

@fred=something  #列表上下文

($a,$b)=something  #列表上下文

($a)=something    #列表上下文

print something  #列表上下文

在列表上下文中使用产生标量表达式

@fred=6*7;  #fred为具有单个元素的列表{42}

@fred=undef;  #fred为具有1个undef元素的列表{undef}

@fred={}; #清空列表

强制指定标量上下文：scalar

@rock=qw/ 123 456/;

print “we have”,scalar @rock,”kind rocks”;