in reply to Perl learns Blackjack

my @DECK = qw(02 03 04 05 06 07 08 09 10 10 10 10 11);

What about if an ace is to be used as a 1? It can be either 1 or 11.

Update:DOH! I guess I should have read a little further. Thanks for the correction hossman.

perl -e 'print reverse qw/o b n a e s/;'

Replies are listed 'Best First'.
Re: Re: Perl learns Blackjack
by hossman (Prior) on Jul 02, 2002 at 18:13 UTC
    that's covered in his score method.
[reply]

In Section Cool Uses for Perl