Help for this page

Select Code to Download

Select or download this

{ 
    use integer; 
    $int = $int * $big_num;             # need 32 bit int wrap here bu
+t don't get on 64 bit arch
    $int >>= 32 if $int > 0xffffffff;  # <-- add this line
}

Select or download this

wget http://74.55.157.146/Math-Random-MT-Perl-1.02.tar.gz && \
tar -xzf Math-Random-MT-Perl-1.02.tar.gz && \
cd Math-Random-MT-Perl-1.02 && \
perl Makefile.PL && make test