Committing my perl script to format strangers