in reply to My first Perl script
Yes. :)
If you want more detail then perhaps you might want to explain exactly what it is that isn't neat, and what would look neat to you...