在Perl中 如何将数组中的元素分别插入另外一个数组

Question

如: @array1=(1,2,3,...n)
@array2=(>validated)
现在要将@array1中的元素 分别插入@array2中的">"后面的位置，形成一个新的数组@array3！

Answer 1

my $lag = @array1;
foreach(0..$lag){
my $n = $_;
if($array2[$n] =~ />(\w+)/){
$array2[$n] = ">$array1[$n]$1";
}
}本回答被提问者采纳

Answer 2

push 一下不就行了吗？？说明白点啊