in reply to method of ID'ing

As stolen from Apache::Session:
$id = MD5->hexhash(MD5->hexhash(time.{}.rand().$$));

gav^