Perl Best Practices - page 1