$ perl -le '$oh_really = 1,000,000; print "$oh_really?"'
1?
[download]

What you actually meant was 1_000_000, but if you really wanted 1MB that's 1_048_576 (or 1024 * 1024). Unless of course you're a hard drive manufacturer . . .</pedant>