Телеграмм чат группы modernperl страница 8595

parrot.ru

Рейтинг популярных групп и каналов

В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

Modern::Perl

431 membersпожаловаться на группу

2021 February 27

AP

Anton Petrusevich in Modern::Perl

я обдумываю смысл дальнейшего обсуждения. ну, допустим, я объясню, что, в моём понимании, все сообщения должны соответствовать какому-то набору форматов, что эти форматы прописаны заранее в конфиге, что между форматами есть способы переключения даже для одного аппендера, можно это оформить через контексты или стримы, что твой пример, как вариант, мог выглядеть как

logit debug::user { { user => $user, action => "logged", provider => $provider} };

, а можно было, конечно, и человокочитаемый экшен писать, но тогда анализировать более прикольно.

но ведь всё равно все уже определились кому чего надо и все останутся при своём мнении. вот и думаю я просто прекратить обсуждение за ненадобностью.

источник

14:22пожаловаться #1

b

basiliscos in Modern::Perl

Ну всё верно, вопрос о том, что кому надо. Текст - юзаешь обычный логгер, структурированный - структура. Хотя они и взаимо-подменяемы, но оч. коряво )

источник

14:25пожаловаться #2

AP

Anton Petrusevich in Modern::Perl

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

источник

14:26пожаловаться #3

AP

Anton Petrusevich in Modern::Perl

более того, когда сообщения для лога хотят одну и ту же информацию или она была доступна на более верхнем уровне, а вызванная функция вообще не обязана знать об особенностях окружения откуда вызвана, но логгировать какую-то информацию должна, то эту информацию вовсе можно занести в контекст и она будет доступна автоматически везде в логгере, её не надо будет передавать в функцию, она автоматически будет использована при сохранении в базу/грейлог/файл

источник

14:30пожаловаться #4

b

basiliscos in Modern::Perl

А чем ты такое читаешь? Очевидно, что в файле жсоноподобное глазами нечитабельно.

источник

14:37пожаловаться #5

AP

Anton Petrusevich in Modern::Perl

то есть, у тебя провайдер и юзер на некотором участке константны, то сообщение становится короче:

logit debug::user { { action => "logged"} };

или даже просто

logit debug::user {"logged"};

и соответствующий фильтр принесёт стркутуру (если потребуется)

источник

14:39пожаловаться #6

AP

Anton Petrusevich in Modern::Perl

А чем ты такое читаешь? Очевидно, что в файле жсоноподобное глазами нечитабельно.

я в файл жсоны не писал. в файл писал человекочитаемые строки. жсоноподобное шло в грейлог

источник

14:40пожаловаться #7

AP

Anton Petrusevich in Modern::Perl

при этом параллельно же (по выбору) что-то шло в дб

источник

14:40пожаловаться #8

b

basiliscos in Modern::Perl

Anton Petrusevich

я в файл жсоны не писал. в файл писал человекочитаемые строки. жсоноподобное шло в грейлог

да, удобно, что кастомный контекст можно с собой таскать нек. время.

источник

14:41пожаловаться #9

AP

Anton Petrusevich in Modern::Perl

да, удобно, что кастомный контекст можно с собой таскать нек. время.

угу. привязывать можно было к любому скаляру и когда скаляр выходил из области видимости — чистился стек

источник

14:42пожаловаться #10

AP

Anton Petrusevich in Modern::Perl

более того, к значению в этом скаляре можно было привязывать рутинг аппендеров и как следствие форматы строк

источник

14:43пожаловаться #11

AP

Anton Petrusevich in Modern::Perl

в общем, один раз настроенный конфиг потом можно было между проектами таскать и всё было единообразно

источник

14:44пожаловаться #12

AK

Andrey Konovalov in Modern::Perl

@Warstone
В доках на XLog сказано:

 #callback will not be called if log level is insufficient
        XLog::notice(sub {
            my $msg = '';
            for (...) {
               ...
               $msg .= ...
            }
            return $msg;
        });

Но так не работает, XLog::error(sub { 'hello' }) ничего не выводит. Why?

источник

15:04пожаловаться #13

b

basiliscos in Modern::Perl

весь скрипт покажи

источник

15:13пожаловаться #14

AK

Andrey Konovalov in Modern::Perl

Да просто сделай use XLog; XLog::error(sub {'hello'}) - это и есть весь скрипт :)

источник

15:15пожаловаться #15

AK

Andrey Konovalov in Modern::Perl

Я пробовал делать set_level, но понятное дело не помогло (error по дефолту должен логироваться)

источник

15:15пожаловаться #16

b

basiliscos in Modern::Perl

-> % perl -I var/lib -E 'use XLog; XLog::set_logger(sub { say $_[0] });  XLog::error("hi");' 
21-02-27 15:18:38 [error] -e:1,<top>(): hi
b@hp-note [03:18:38 PM] [~/development/crazy-panda/core-dev] [feature/MEIACORE-1553 *]
-> % perl -I var/lib -E 'use XLog; XLog::set_logger(sub { say $_[0] });  XLog::error(sub {"hi"});'
21-02-27 15:18:48 [error] -e:1,<top>(): hi

источник

15:19пожаловаться #17

b

basiliscos in Modern::Perl

всё работает

источник

15:19пожаловаться #18

b

basiliscos in Modern::Perl

ты логгер, видимо, не задал

источник

15:19пожаловаться #19

AK

Andrey Konovalov in Modern::Perl

ты логгер, видимо, не задал

Не понял, а зачем логгер задавать, там же дефолт есть . Он же сообщения не из sub {} логирует

источник

15:29пожаловаться #20