Select Code to Download

sub merge {
    my (@array1,@array2) = @_;

sub merge {
 my %hash;
...
my @array2 = qw(c d e f g);
my @merged = merge(@array1, @array2);
print "@merged\n";