Perl Programming/Structure and Style