Vorweg: Leider bin ich mir auch immer unsicher, wie genau Computer Zufallszahlen erzeugen.
Statt List::Util::shuffle() könntest Du auch eine Zufallszahl erzeugen und dann die Sache mit der Liste von Hand machen. Hier ist eine ganz gute Anleitung:

http://perl-howto.de/2008/06/zufallszahlen-pseudo-...

Der Zufallszahlengenerator hat irgendwas mit einem "seed" zu tun. Mit srand() kann man auf den einwirken. Auf der Seite heißt es aber:

Quote

Rufen Sie niemals srand() auf, wenn Sie nicht genau wissen, was Sie tun. Perl ruft srand() automatisch für Sie mit einem geeignetem Seed auf, sobald rand() verwendet wird.

Das heißt: Normalerweise braucht man sich um diese Details nicht zu kümmern. Ansonsten gibt es für stärkeren Zufall noch das interessante Modul Math::Random::Secure.