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