... a Perl script is correct if it's halfway readable and gets the job done before your boss fires you. -- Larry Wall and Randal L. Schwartz, _Programming Perl_, p. 10
Go get one!