perlの表示方法について

Question

perlの質問です。

my @arr1 = qw /a b c d e/;
my @arr2 = qw /f g h i j/;

この配列を
af
bg
ch
di
ej
このように表示させるにはどうすればよいでしょうか？

Answer 1

use strict;
use warnings;
use feature ':5.10';

my @arr1 = qw /a b c d e/;
my @arr2 = qw /f g h i j/;

say for map{$arr1[$_].$arr2[$_]}(0..$#arr1);

#
af
bg
ch
di
ej

Answer 2

pythonのzipのようなイメージでしょうか。特別な構文や関数は用意されていない（CPANを漁れば何かあるかもしれませんが）と思うので、私なら愚直にforループを回します。

my @arr1 = qw /a b c d e/;
my @arr2 = qw /f g h i j/;
for(my $i=0; $i<=$#arr1; $i++){
  print "$arr1[$i]$arr2[$i]\n"
}