Thanks a lot you guys thats great coding, I will definately not need more than this, what i had so far was this, but your scripts definately beat it, although i made it if this is unequal put it in this list just to get more understanding of what i had to do.

foreach @allcards {
if $allcards[$count] != @userinput[0] or 
if $allcards[$count] != @userinput[1] or 
if $allcards[$count] != @userinput[2] or 
if $allcards[$count] != @userinput[3] or
if $allcards[$count] != @userinput[4] or
if $allcards[$count] != @userinput[5] {
push (@resthand,$allcards[$count]);
}
count++;}
[download]