Please write me a program for the same. It will help.

Please clean my gutters for me. It will also help.

Seriously. Show some code you've tried if you want guidance or offer to pay someone privately if all you want is code written. Some relevant documentation you might read to get started on your own includes the top stuff here perlre and open.