$ perl -MMath::Random::MT=rand,srand -le"srand(1); print rand(12345) for 1 .. 50"
5148.13657070627
12310.246456404
8892.40582026076
11512.4206240196
1.41203443869017
1581.69630774879
3732.29554886813
12333.1551625498
1811.70149353682
2914.51841197908
1139.91996193305
4895.789064212
2299.38230826985
4788.75808798126
4265.94715111074
8268.01486832555
4898.09440057492
11549.2298513988
6651.69255516725
10447.7082854183
5174.95633772342
3867.36151787569
8459.03473588871
6475.54706860799
2523.96301376517
5474.42597342189
10840.3597598732
2834.1307814559
338.099872228922
6597.33968452318
8276.92138082581
11282.8611665452
5151.62780927843
5644.19336932129
6897.02591841691
5316.9738478458
1733.07673668838
11593.5326284426
2445.5628111586
9609.21511215856
9885.19167181221
8838.65595643991
11953.189104289
9910.04137739888
3869.2215599434
1145.6260023464
8546.72270601382
6396.59320793697
10819.0240084066
10678.6749283969