Hi,
What is the PERL script supposed to do and where exactly are you having problems, in a quick summary? Happy to help out and eager to earn myself a reputation (and hey, even some money :) here on Freelancer.
Feel free to contact me for further discussion.
Thank you for your time and consideration,
Regards,
Owen