取数组中分段部分

my @a=(1..10);
$b=join "\t",@a[1..3,$#a-1];
print "$b";

结果：

2 3 4 9

posted @ 2012-12-27 09:43  蒋蒋  阅读(293)  评论(0)  编辑  收藏  举报