数组相关函数

1330阅读 0评论2013-05-25 zhengsenlin888
分类:PERL

在数组中修改

我们会使用@stack来演示这些:

my @stack = ("Fred", "Eileen", "Denise", "Charlie");
print @stack; # "FredEileenDeniseCharlie"
  取出并返回数组的最后一个元素。这可以被认作是栈顶
print pop @stack; # "Charlie"
print @stack;     # "FredEileenDenise"
 追加额外的元素到数组末尾:
push @stack, "Bob", "Alice";
print @stack; # "FredEileenDeniseBobAlice"

 取出并返回数组的第一个元素:

print shift @stack; # "Fred"
print @stack;       # "EileenDeniseBobAlice"
 插入一个新元素到数组开头:
unshift @stack, "Hank", "Grace";
print @stack; # "HankGraceEileenDeniseBobAlice"
pop,push,shift and unshift是 (拼接)的特殊情况。splice删除并返回一个数组片段,用一个不同的数组片段代替它:
print splice(@stack, 1, 4, "<<<", ">>>"); # "GraceEileenDeniseBob" 好像是删除数组的[1][2][3][4]个元素,然后再返回。
print @stack;                             # "Hank<<<>>>Alice" 
上一篇:perl计算数组个数,标量长度
下一篇:perl 连接DBI insert