Mmc - возвращаясь к часикам в мессагах.

[lexik]

Пришло мне тут письмо - может быть и интересное кому-нибудь...
*************************************

Странно! Обычно робот-регистратор форвардит запрос моментально! 
Мне-же ничего не падает:( Это похоже на неувязку между доменами. 
И высока вероятность того, что повторная регистрация и повторный запрос также могут не пройти. 
Абыдно! Хотелось задать интересный вопросик спецам от перла! 

Давайте я его размещу тут, и если модераторам не будет слишком сложно, перебросте его на форум! Правда я в таком случае ничего пискнуть уже не смогу. Но это уже не самое главное! 
Ответы важнее:)!

С уважением.

Всем здравия!
Столкнулся я с щепетильной проблемкой...
И очень надеюсь, что она кого-нибудь из пёрлистых гурманов заинтересует!
В общем, беда тут где-то в нюансах, которые я никак не догоняю
Затея вроде как банальная и обыденна. Прикрутка часиков к трасферящимся в другие окна мессагам. Но мне - нужна расспасировка цветов, чтоб сообщение подхваченное триггером кидалось в другое окно таким, каким оно и пришло от сервера!
Дело тут в том, что, зачастую теляющие имеют весьма характерно раскрашенные подписи, и вообще цветами крутят как хотят. Я и сам такой! И все это, порой несет полезную информацию, терять которую жалко И вот тут упс.. Затык!

Вот триггер, которй нормально кидает телы во 2-е окошко сохраняя цвета!

trig { wecho(1, CL::unparse_colors($;)); } 'говорит', '1111:msg';

Вот с ровно прикрученным временем и подсвеченный белым.
Ровность имется в виду - в основное окно идет текст прямой, во 2-е с ровным временем:
[01:15:15] Кто-то говорит что-то...
[12:05:99] Кто-то говорит что-то...
и unparse здесь уже увы - с боку(

use Timer;
...
trig { 
        $U::tmsg = $Timer::system_time; 
        $U::msg = "\003P[$U::tmsg] $1 говорит $2";
        wecho (1, ($U::msg)); 
$; } '^(.*?) говорит (.*?)$', '1111:msg';

И как-бы теперь все, что есть хорошего с часами и исходными колорами, совместить в одном флаконе-триггере? У меня что-то не получается, похоже ума не хватает