perl学习笔记之<数组>
时间:2007-06-02 来源:ouyangxiaodong
.创建数组:
@array=("one","two","three");
print @array;
onetwothree
print "$array[0]"
one
.计数:$#array表示一个数组里的最后下标号
.数组的出栈和入栈push,pop;push也可完成合并数组的功能;
.数组的移位和反移位:shift和unshift
与push和pop相比,它们在数组的左端增加和删除数值。
.数组的清空:(1)$#array=-1(2)@array=()但@array=undef不行
.数组片:通过方括号来完成,
.数组拼接splice ARRAY,OFFSET,LNEGTH,LIST
@array=("one","two");
@array2=("two","three","four");
splice(@array,2,1,@array2);
print join(", ",@array);
one,two,three,four
.数组反向reverse
.数组排序sort字母
使用数字比较运算符<=>: sort{$a<=>$b}@array
.删除数组:delete
.读取命令行参数:@ARGB数组
相关阅读 更多 +
排行榜 更多 +