http://www.perlmonks.org?node_id=77582


in reply to Confessional

For penance I shall write^Wprint 'use strict' 1000 times:
print "use strict\n" x 1000;