This is not a "please write a script for me" site.
If you learn some perl and try to set up a piece of code on your own, weŽll be glad to help.

To get you started, read How to ask questions the smart way.