perl -E 'open E, ">/tmp/$_.txt" and say for 1..1024'