perl -MMath::Random::MT::Perl -e "Math::Random::MT::Perl->new(1)" > outp

##</code><code>##

init 1: 1812433254
init 2: 764828710
init 3: 322750068
init 4: 136197301
init 5: 57473899
init 6: 24253410
init 7: 10234696
init 8: 4318939
init 9: 1822549
init 10: 769097
init 11: 324551
init 12: 136957
init 13: 57794
init 14: 24388
init 15: 10291
init 16: 4342
init 17: 1832
init 18: 773
init 19: 326
init 20: 137
init 21: 57
init 22: 24
init 23: 10
init 24: 4
init 25: 1
init 26: 1812433279
init 27: 764828720
init 28: 322750072
init 29: 136197303
init 30: 57473900
init 31: 24253411
init 32: 10234696
init 33: 4318939
init 34: 1822549
init 35: 769097
init 36: 324551
init 37: 136957
init 38: 57794
init 39: 24388
init 40: 10291
init 41: 4342
init 42: 1832
init 43: 773
init 44: 326
init 45: 137
init 46: 57
init 47: 24
init 48: 10
init 49: 4
init 50: 1
...

##</code><code>##

    use64bitint=define use64bitall=define uselongdouble=undef