I actually was considering using modules to do this, but decided not to,
in the interest of not having some one who isn't familiar with Perl using
this program and having to install a module on their system to run it.

TStanley
In the end, there can be only one!