splicing two arrays together

[lblake]

Hello wise ones,

I've managed to splice two arrays of strings together to make one sentence. However, there's something wrong with the final outcome which is: Can you unlock the the secret code? I am not clear on why there are two 'the the'?

Here's the code I used:

#!/usr/bin/perl
use strict;
use warnings;


my @first = qw(Can unlock secret);
my @second = qw(you the code?);

print "Array contents of first array before splice: @first\n";
print "Array contents of second array before splice: @second\n";
splice(@first, 1, 0, @second[0,-2]);
print "After splice the array contains: @first\n";
my @newArray = @first;



splice(@newArray, 5,0,@second[0,2]);
print "After splice the array contains: @newArray\n";

my @newArray1 = @newArray;


splice(@newArray1, 2,1);
print "After splice the Array1 contains: @newArray1\n";

my @newArray2 = @newArray1;
splice(@newArray2, 4,1);
print"After splice the Array2 contains: @newArray2\n";

my @newArray3 = @newArray2;


splice(@newArray3,3,0, @second[1,1]);
print "Final splice Array3 contains: @newArray3\n";

I am not even sure if this is the best way to use the splice function to achieve my goal? Thanks