perl script in qmail

[Essy Ren]

how can I make script like this if i am using perl :

if grep -i /usr/backup/erro $mysql
then echo to: [EMAIL PROTECTED]
fi