perl 中，如何使foreach一次迭代同时输出两个元素呢
1个回答
展开全部
@m = (1, 2, 3, 4);
$i = 0;
while ($i < $#m)
{
($m, $n) = @m[$i..$i+1];
print "$m $n\n";
$i += 2;
}
可以用while来做
$i = 0;
while ($i < $#m)
{
($m, $n) = @m[$i..$i+1];
print "$m $n\n";
$i += 2;
}
可以用while来做
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
