random - UID に追加するランダムな文字列を生成する

Question

UID の末尾に追加する一意にランダムな英数字の文字列を生成することを好みます。

これまでクラス ライブラリで見つけた中で最も近いのは、次善の策である数値を生成する Random クラスです。

私がこれまでに持っているものは次のとおりです。

getNextRandomNumber
^(((rand nextValue) / 
   (Time now milliSeconds asInteger / Time now minutes asInteger 
   + (Time now hour24 asInteger)) asInteger)).

rand次のように初期化されるクラス変数です。

initialize
    rand := Random new.

これは非常に下手に書かれているようです。しかし、他に何をすべきかわかりません。