Re^4: randfunc in Config

I too am not sure what reasons anyone would have for wanting to know which random number generator is behind rand(). If they do care, I would hope they would use a module of some sort that brings some guarantees of randomness with it. I know Dana Jacobsen has spent a lot of time thinking about this.

l8rZ,
--
andrew

Comment on Re^4: randfunc in Config Download Code

Replies are listed 'Best First'.
Re^5: randfunc in Config by choroba (Cardinal) on Jul 15, 2016 at 15:32 UTC
For the time being, I added a warning if Perl version is 5.20+ and rand isn't implemented by `Perl_drand48` ; in the test, I switched to testing a sequence with a known seed. If interested, you can check Fix drand48 test on OpenBSD and Warn if rand is not implemented via Perl_drand48 on GitHub. ($q=q:Sq=~/;[c](.)(.)/;chr(-\|\|-\|5+lengthSq)`"S\|oS2"`map{chr \|+ord }map{substrSq`S_+\|`\|}3E\|-\|`7**2-3:)=~y+S\|`+$1,++print+eval$q,q,a, [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^5: randfunc in Config
by choroba (Cardinal) on Jul 15, 2016 at 15:32 UTC

rand

Perl_drand48

Fix drand48 test on OpenBSD

Warn if rand is not implemented via Perl_drand48

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

[reply]
[d/l]
[select]