在Perl中 如何将数组中的元素分别插入另外一个数组
如:@array1=(1,2,3,...n)@array2=(>validated)现在要将@array1中的元素分别插入@array2中的">"后面的位置，形成一个新的...
如: @array1=(1,2,3,...n)
@array2=(>validated)
现在要将@array1中的元素 分别插入@array2中的">"后面的位置，形成一个新的数组@array3！ 展开
@array2=(>validated)
现在要将@array1中的元素 分别插入@array2中的">"后面的位置，形成一个新的数组@array3！ 展开
2个回答
展开全部
my $lag = @array1;
foreach(0..$lag){
my $n = $_;
if($array2[$n] =~ />(\w+)/){
$array2[$n] = ">$array1[$n]$1";
}
}
foreach(0..$lag){
my $n = $_;
if($array2[$n] =~ />(\w+)/){
$array2[$n] = ">$array1[$n]$1";
}
}
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
push 一下不就行了吗？？说明白点啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
