Currently, I don't know how to use modules, I'm new to Perl. It
also seems that much of the things I write have already been
done, usually alot more comprehensive than my own.
Nobody likes to reinvent the wheel, unless they can make it
rounder. My above script is just a smaller, simpler wheel.