perl -e 'open my $outfh, ">", "sample.txt"; while ($i++ < 50_000_000) {print $outfh "abcdefghijklmnopqrstuvwxyz0123456789\n";}'