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


in reply to removing a sublist

my @no_prev_winners = grep { my $correct = $_; !grep { $_ eq $correct } @winners } @correct;