логгер - это бэкенд, куда мессаджи складывать. Дальше. XLog::logxxx() - это фронтэнд, к-й лог-мессаджи производит.

бэкэнды есть - перловый (в примере выше), XLog::Console, XLog::File и XLog::Multi

по дефолту логера нет, и сообщение отправляется в /dev/null

perl -E 'use XLog; XLog::set_logger(sub { XLog::error($_[0]) }); XLog::error(sub {"FYAH"})'

Ой, блин, рекурсия :)
Ясненько теперь, без установки логгера никак

Вполне приятно так работает. Но отсутствие поддержки @message на входе немного бесит всё же

use 5.16.1;
use AnyEvent;
use AnyEvent::Handle;
use XLog;

my $cv = AE::cv;

XLog::set_logger(sub {  
    state $afh_stderr = AnyEvent::Handle->new(fh => \*STDERR);
    my $msg = $_[0] =~ s%(?<=[^\n])$%\n%r;
    my $aeh_alarm; $aeh_alarm = AE::timer 0.1, 0, sub {
        undef $aeh_alarm;
        $afh_stderr->push_write($msg);
        $cv->send
    }
});

XLog::error(sub {'FYAH, Gummy-Bluez!'});

$cv->recv;

Почему так привязались к единственному скаляру-то?

ну это ж уже отформаченный мессадж. А что хотелось?

use 5.16.1;
use AnyEvent;
use AnyEvent::Handle;
use XLog;

my $cv = AE::cv;

XLog::set_logger(sub {  
    state $afh_stderr = AnyEvent::Handle->new(fh => \*STDERR);
    my $msg = $_[0] =~ s%(?<=[^\n])$%\n%r;
    my $aeh_alarm; $aeh_alarm = AE::timer 0.1, 0, sub {
        undef $aeh_alarm;
        $afh_stderr->push_write($msg);
        $cv->send
    }
});

XLog::error(sub {'FYAH, Gummy-Bluez!'});

$cv->recv;

выглядет как оч. неэффективный код. Советую взять XLog::Console как логгер. Делает тоже самое, на C, и зуб даю, что быстрей по CPU и по памяти )

Ну так в форматтер-то прилетает скаляр

А хотелось бы, чтобы массив прилетал.

XLog::info(qw/somewhere in the darkness/)
В форматёр прилетает
[qw/somewhere in the darkness/]

массив чего?

См выше

ну... мы логируем строку, а не строки/метки/... если надо именно массивы и т.п. см. что Антон предлагал.

ну и потому, что даже если аргументы склеить, то получится somewhereinthedarkness, а если "подставлять" в формат, то тк нет % то получится просто somewhere

Просто в большинстве случаев все равно придется за рамками логера склеивать

зачем?

xlog'::file тебе на диске склеит

Друзья, подскажите есть ли модуль приводящий query string формата ?foo[bar][0]=555&foo[bar][1]=444 в структуру perl?