#! perl -slw
use strict;

printf "%030d\n", $_ for 1 .. 1e3;
print "Press enter to exit";