Practices in PERL