小骆驼第三章:列表和数组

一、数组的定义
1. 普通定义:以逗号分隔
@lines=(fred,barney,betty,wilma,dino)

2. 使用qw:以空格分隔,只认空格
@lines=qw!fred barney betty wilma dino!
@lines=qw{fred barney betty wilma dino}

3. 分隔符转义
@lines=qw!fred /!barney betty wilma dino!

4. 数组的索引上限
$up_index = $#lines;

5. 数组的元素数量
$cnt = @lines;(在标量的上下文,这里返回的就是数组元素的数量)
$cnt = scalar @lines;

二、数组的技巧
1. 多个变量批赋值
($v1,$v2,$v3)=(1,2,3)
2. 两个变量交换值
($v1,$v2)=($v2,$v1)

三、数组的赋值
@giant = 1..100; #100个元素的数组
@stuff = (@giant, undef, @giant); #201个元素的数组

@datas = (1,4,5,2);
@datas = sort @datas; #排序操作
@datas = reverse @datas; #反转操作

四、print是列表上下文
my @lines = (abc,def,ghi);
print @lines; #结果是abcdefghi
print "@lines"; #结果是abc def ghi

五、@lines=<STDIN>一次读入所有的行