回答編集履歴
2
Update
test
CHANGED
|
@@ -6,7 +6,7 @@
|
|
|
6
6
|
my @arr1 = qw /a b c d e/;
|
|
7
7
|
my @arr2 = qw /f g h i j/;
|
|
8
8
|
|
|
9
|
-
say for map{
|
|
9
|
+
say for map{$arr1[$_].$arr2[$_]}(0..$#arr1);
|
|
10
10
|
|
|
11
11
|
#
|
|
12
12
|
af
|
1
Update
test
CHANGED
|
@@ -6,8 +6,7 @@
|
|
|
6
6
|
my @arr1 = qw /a b c d e/;
|
|
7
7
|
my @arr2 = qw /f g h i j/;
|
|
8
8
|
|
|
9
|
-
|
|
9
|
+
say for map{($arr1[$_].$arr2[$_])}(0..$#arr1);
|
|
10
|
-
say for @zipped;
|
|
11
10
|
|
|
12
11
|
#
|
|
13
12
|
af
|