my @no_prev_winners = grep { my $correct = $_; !grep { $_ eq $correct } @winners } @correct; [download]
In reply to Re: removing a sublist by Riales in thread removing a sublist by Aldebaran