Select Code to Download

my @test = qw(camel aplaca peguin aplaca 
              monkey camel camel");
my @redundant;
...
   push (@redundant, $_);
}
print "@redundant\n";