Shoutbox

Ah, didn't realise it could use anonymous functions for the replace param. Was looking for a way to do it (and my original regex did include multiple space), but all I could find was that it can only be done in POSIX style regex, not perl