佐藤と申します。
現在、mysql+perlでランダムアクセスしようとしていますが、うまくいきません。
はじめ、
SELECT a FROM b WHERE c ORDER BY rand() LIMIT d,10
のようにしていましたが、
１０件以上の場合、次ページで再度rand() が実行されると当然
前回の抽出した内容を考慮していませんので、だぶってしまいます。
そこで、perlのrandで乱数を生成し,それを使おうと思いました。

$r = rand;
SELECT a FROM b WHERE c ORDER BY rand($r) LIMIT d,10

こんな感じです。

しかし、乱数は生成していますが、
なかなかランダムになってくれません。

具体的には
１０回中、
パターン１が８回
パターン２が２回
と２パターンぐらいしかランダムになりません。

何が原因でしょうか。
アドバイスいただけましたら幸いです。