Actually, perl is smarter than that. rand will call srand for you if you don't do it.

michael
the blue haired monk