http://www.perlmonks.org?node_id=1038105


in reply to Using Splice with Two Arrays within a loop

Your function already exists in module List::MoreUtils.

use strict; use warnings; use List::MoreUtils qw{ mesh }; my @first = qw(Can unlock secret); my @second = qw(you the code?); my @mixed = mesh @first, @second; print "Result: @mixed\n";

UPDATE: Again a few seconds too late... davido being faster again!