SPUG: Stick Riddle

Michael R. Wolf MichaelRunningWolf at att.net
Thu Jan 2 01:35:10 CST 2003


Damian Conway <damian at conway.org> writes:

>      sub norm_rand {
>          my $norm = 0;
>          for (1..8) { $norm += rand() }
>          return $norm / 8;
>      }

Why do this at all?  And why 8?

-- 
Michael R. Wolf
    All mammals learn by playing!
        MichaelRunningWolf at att.net


 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     POST TO: spug-list at pm.org       PROBLEMS: owner-spug-list at pm.org
      Subscriptions; Email to majordomo at pm.org:  ACTION  LIST  EMAIL
  Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address
 For daily traffic, use spug-list for LIST ;  for weekly, spug-list-digest
     Seattle Perl Users Group (SPUG) Home Page: http://seattleperl.org




More information about the spug-list mailing list