Help for this page
c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le "sub shuffle { ... dd \@reordered; " [0]