@hand = shuf(@deck); print "deck shuffled once:\n"; print"@hand\n"; @deck = @hand; @newhand = shuf(@deck); print"deck shuffled twice:\n"; print"@newhand\n";