So what code have you written and where do you encounter problems?

This is not a program writing service. This site is about learning and programming Perl. We will help you with your existing code, or with general advice on how to best proceed, but we will neither do your homework nor your pay-work for you.

You will likely want to read perlretut and/or index, depending on how you want to approach this problem.