Perl 学习笔记（7）

arongsoft

　　基本构建的堆栈：列表与数组
　　在本章中将要学习：（1）如何填充和清空数组 （2）如何逐个元素查看数组 （3）如何对数组进行排序和输出  （4）如何将标量分割成数组，以及如何将数组重新合并成标量。
　　一、将数据放入列表和数组
　　（5，'apple', $x , 3.14)   这就是个列表的例子
　　如果列表只包含简单的字符串，而用单引号将每个字符串括起来又太麻烦，那么就可以用qw运算符
　　qw(apples oranges 45.6)
　　上面代码的意思就是跟这个代码一样
　　('apple','oranges','45.6','$x')
　　范围运算符 (1..10)        构成一个包含1到10之间的所有数的列表
　　=======================================
　　二、数组
　　@boy=qw(greg petter bobby)
　　数组赋值也可以包含其他数组甚至空列表
　　@copy=@origina;
　　@clean=();
　　在这里，@original数组的所有元素都被拷贝到新数组@copy中。如果@copy中原先已经拥有元素，那么这些元素就会丢失。
　　($a , $b, $c)=qw(apple oranges bananers)
　　在这个例子中，$a被初始化为apple  $b被初始化为oranges
　　=============================================
　　从数组中取出元素
　　若要获得整个数组的内容，最简单的方法是使用双引号中的数组
　　print "@array";
　　若要访问一个元素，用$array[index]
　　还可以将数组划分成分组，称为片   ，使用@标号
　　@conifers=@trees[5,7]
　　====================================================
　　寻找结尾
　　perl提供两个机制，第一个方法是个特殊变量，其形式是$#arrayname.
　　@trees=qw(oak cedar maple apple)
　　print  $#trees            输出3
　　$size=@array        将@array中的元素数量放入$size中        为4
　　$array[-1] 是@array得最后一个元素    -2倒数第二个元素
　　==========================================================
　　对数组进行操作
　　@flavors=qw(chocolate vanilla strawberry mint)
　　for ($index=0;$index