IRC Bot written in perl