Select Code to Download

my @winners=("ruth","sheila");
my @correct=("ruth","martin","dee","zack");
...
@correct{@correct}= ();
delete @correct{@winners};
print join(' ',keys %correct),"\n";