配列に配列を挿入する

配列に配列を挿入するには、spliceを使います。

---

my @foo = qw(ari hituji inko cat dog);
my @baa = qw(sky tree note memo);

splice(@foo, 1, 0, @baa); # 配列fooの１番目に配列baaを挿入

my $i = 0;
foreach my $item(@foo) {
    print "[$i]:$item\n";
    $i++;
}

---

結果は以下のようになります。

---

[0]:ari
[1]:sky
[2]:tree
[3]:note
[4]:memo
[5]:hituji
[6]:inko
[7]:cat
[8]:dog

---