Your's and arden's code (from his second response) where the only two that I could get to work. I like the simplicity of your's, but arden's seems to run faster.
I guess this was a bit more tricky then I though. Thank god for perlmonks. I appreciate the help.
-Dru