すみません、教えてください。
PerlでＣＧＩなのですが、
例えば十個の$a1,$a2…$a10があり、
ここに10をランダムに格納していきたいのです。
…うまく説明できない…

例えば、
一回目は $a1=2,$a2=3,…$a10=1 でトータルで10
二回目は $a1=4,$a2=1,…$a10=2 でトータルで10
これを十回繰り返す。

という具合です。
判り難くて申し訳ないのですが、
なにとぞご教授下さいませ。