http://www.perlmonks.org?node_id=159449


in reply to perl rand() function

Yes, it is zero inclusive, however, I wouldn't be waiting around for perl -e '1 while rand' to finish within my lifetime.
   MeowChow                                   
               s aamecha.s a..a\u$&owag.print