Did you try searching, I'm pretty sure this will produce many "sample scripts".

Next step is modifying them for your needs.

Then, if necessary, you'll show your efforts and we'll help you improving your Perl skills! =)