Since I've learned my lesson about parsing without a parser, allow me to point you to Parse::IRC, which could be a lot of help to you. Enjoy!

Hays