リストをランダムに並び替える (module)List-Util_shuffle

標準モジュール(5.8以降)の List::Util の shuffle 関数を使う

use List::Util (shuffle);

@rand = shuffle("a", "b", "c");;
foreach (@rand) {
  print "$_\n";
}