It's sad to see young Asmo's reasonable effort at coding being downvoted.   Of course the Other Ways To Do It in this thread are beneficial, and doubtless better, but the downvotes aren't a terribly monkish way to encourage new Perlers to learn and grow.
    a bit less cheerful,
    Don
    striving toward Perl Adept
    (it's pronounced "why-bick")