my %messages;
$messages{tell} = qr/^(\w+ tells you '.*')$/;
$messages{ooc} = qr/^(\(OOC\) \w+: .*)$/;
$messages{gnet} = qr/^(\(GNET\) \w+: .*)$/;

(GNET) Kain: im looking for someone to adept quicktalk with? ill tech 
+them that skill and they can get 33k frmo me
(OOC) Brutus: try insecnts
Destiny tells you 'shut up and go away!'
[download]