Thanks, guys. I appreciate the responses. I couldn't get either of those solutions to work so I'll switch over to using File::Find. I don't know why I didn't think of that before - I use it in other scripts. :\ I guess I was just trying to see if I could tweak the script and get it to work since it's super fast.
Thanks again, Frank SurfShopCART -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
