数组变量，列表直接量。
数组或者列表的每个元素都是单独的标量变量，拥有独立的标量值。可以存储不同类别的元素，但是不鼓励这样做。
访问数组中的元素
使用下标来引用数组元素，从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”;