perl -e '$\=a;$\++for-74..285e3;print'