perl中shift 和unshift *** 作

概述#################################################################### http://blog.csdn.net/imintel/article/details/5416018 # unshift 和shift 对一个数组的开头进行 *** 作（数组的左端有最小下标的元素）。 # unshift 和shift，如果其数组变量为空，则返回un #################################################################### http://blog.csdn.net/imintel/article/details/5416018
# unshift 和shift 对一个数组的开头进行 *** 作（数组的左端有最小下标的元素）。
# unshift 和shift，如果其数组变量为空，则返回undef。
#################################################################### #!/usr/bin/perl -w
@array = qw#one two three#;
$m = shift (@array); #$m 得到“one”,@array 现在为(“two”,“three”)
shift @array;     #@array  现在为（“three”）
 现在为空
$n = shift @array;    #$n 得到undef,@arry 仍为空
unshift(@array,5);      现在为（5）
unshift @array,4;       现在为(4,5)
@others = 1..3;
总结

以上是内存溢出为你收集整理的perl中shift 和unshift *** 作全部内容，希望文章能够帮你解决perl中shift 和unshift *** 作所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。