perl -le '$ar[300_000_000]=1; '