Thank you very much for the response. I really do appreciate the inputs.

Obviously, I am newbie to PERL . This is a script that I created from looking at 3-4 existing scripts in place (read 10 years or above) and picking parts that would suit my needs.

I will go through each and every point of yours and try to update it.