Re: Hashes aren't being differently randomized

I think you need a debugging perl for the environment var to work. But you can get the same effect from Hash::Util::hash_seed(), which returns 0 if hash seed randomization is NOT in effect. From what i can tell Activestates builds disable this feature.

---
$world=~s/war/peace/g

Comment on Re: Hashes aren't being differently randomized

Replies are listed 'Best First'.
Re^2: Hashes aren't being differently randomized by Hue-Bond (Priest) on Jun 27, 2006 at 22:59 UTC
I think you need a debugging perl for the environment var to work. [...] you can get the same effect from Hash::Util::hash_seed() Both environment variables shown in the OP seem to be working: `$ PERL_HASH_SEED_DEBUG=1 perl -MHash::Util=hash_seed -le'print hash_se +ed' HASH_SEED = 165032588 165032588 $ PERL_HASH_SEED_DEBUG=1 perl -MHash::Util=hash_seed -le'print hash_se +ed' HASH_SEED = 725441538 725441538` [download] tye's `getKeyCollisions` shows always the same output here: `$ PERL_HASH_SEED_DEBUG=1 perl gkc.pl \| md5sum HASH_SEED = 501557310 e4d6401f730eede592733482fac0ec61 - $ PERL_HASH_SEED_DEBUG=1 perl gkc.pl \| md5sum HASH_SEED = 1324598606 e4d6401f730eede592733482fac0ec61 -` [download] I don't know if it's supposed to do so or not. I'm beginning to take a fancy to this :) since it seems to be impossible to obtain some different output of anything between runs of perl (well, anything except hash seeds!). -- David Serrano	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^2: Hashes aren't being differently randomized
by Hue-Bond (Priest) on Jun 27, 2006 at 22:59 UTC

I think you need a debugging perl for the environment var to work. [...] you can get the same effect from Hash::Util::hash_seed()

Both environment variables shown in the OP seem to be working:

$ PERL_HASH_SEED_DEBUG=1 perl -MHash::Util=hash_seed -le'print hash_se
+ed'
HASH_SEED = 165032588
165032588
$ PERL_HASH_SEED_DEBUG=1 perl -MHash::Util=hash_seed -le'print hash_se
+ed'
HASH_SEED = 725441538
725441538
[download]

tye's getKeyCollisions shows always the same output here:

$ PERL_HASH_SEED_DEBUG=1 perl gkc.pl | md5sum
HASH_SEED = 501557310
e4d6401f730eede592733482fac0ec61  -
$ PERL_HASH_SEED_DEBUG=1 perl gkc.pl | md5sum
HASH_SEED = 1324598606
e4d6401f730eede592733482fac0ec61  -
[download]

I don't know if it's supposed to do so or not. I'm beginning to take a fancy to this :) since it seems to be impossible to obtain some different output of anything between runs of perl (well, anything except hash seeds!).

--
David Serrano

[reply]
[d/l]
[select]