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