Select Code to Download

#!/usr/bin/perl 
use strict;
...
push (@hand, &pick_a_card(\@deck));
&show_my_hand(@hand);
#game loop here

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+~~~~~~~~~~
[K of diamonds][10 of clubs][4 of clubs][5 of clubs][6 of clubs]
...
Deck No. 44 has 9 of clubs
Deck No. 45 has 3 of spades
Deck No. 46 has 7 of clubs