The purpose of this site is to help people learn perl, or with their perl problems. Not to do your job for you. Please read and understand PerlMonks for the Absolute Beginner and How do I post a question effectively?.