perldoc -f rand