Bot IRC written in perl