for( my $i = 0; $i < 1_000_000; $i++ ) {
    print join ' ', map { int rand 256 } 0 .. 50;
    print "\n";
}