Help for this page

Select Code to Download

Select or download this

  use Math::Random::MT::Auto 'shuffle';

  my @cards = 0..51;
  shuffle(\@cards);