Perl-将两个数组元素连接在一起

Perl-将两个数组元素连接在一起,perl,Perl,我正在寻找将两个数组元素连接在一起的最佳方法: @array1 = (test1, test2, test3, test4, test5); @array2 = (answer1, answer2, answer3, answer4, answer5); 我想将array1和array2连接在一起,形成下面的管道分隔数组元素。最有效的方法是什么 @array3 = (test1|answer1, test2|answer2, test3|answer3, test4|answer4, tes

我正在寻找将两个数组元素连接在一起的最佳方法:

@array1 = (test1, test2, test3, test4, test5);

@array2 = (answer1, answer2, answer3, answer4, answer5);
我想将array1和array2连接在一起,形成下面的管道分隔数组元素。最有效的方法是什么

@array3 = (test1|answer1, test2|answer2, test3|answer3, test4|answer4, test5|answer5);

也许你可以使用这些代码,循环很简单

my @array1 = qw/test1 test2 test3 test4 test5/;
my @array2 = qw/answer1 answer2 answer3 answer4 answer5/;
my @array3 = map { $array1[$_]."|".$array2[$_] } 0..$#array1;

这假设两个数组的大小相同。

请尝试使用您自己的perl编码,这将对您有更好的帮助。这听起来像是XY问题。你想完成什么?我想知道散列是否更合适?你能为最后一行添加解释吗?@JohnDoe-Sure.Map函数很有用。就像:for$I=0$我