Help for this page

Select Code to Download

Select or download this

BEGIN {
  *CORE::GLOBAL::srand = \&my_srand;
  *CORE::GLOBAL::rand  = \&my_rand;
};

Select or download this

use warnings;
use strict;
...
__END__

Outputs 023647263525973192