in reply to Piano Man

use List::Utils qw(shuffle);
my @shuffled_crowed = shuffle @crowd;

[download]
Great job!

-nuffin
zz zZ Z Z #!perl

In Section Perl Poetry