Size: a a a

2020 January 22

OP

Oleg Pronin in Modern::Perl
Это костыль чтоб побыстрее работало
источник

VG

Vadim Goncharov in Modern::Perl
так если всё равно надо писать $debug and ...
источник

OP

Oleg Pronin in Modern::Perl
Для твоей задачи если ты не реагируешь на рантайм ты можеешь ае::лог просто подменить
источник

AK

Andrey Konovalov in Modern::Perl
Oleg Pronin
Для твоей задачи если ты не реагируешь на рантайм ты можеешь ае::лог просто подменить
+100
источник

AK

Andrey Konovalov in Modern::Perl
Именно
источник

OP

Oleg Pronin in Modern::Perl
Vadim Goncharov
так если всё равно надо писать $debug and ...
Проверка переменной на истинность и вызов функции разные вещи по скорости
источник

VG

Vadim Goncharov in Modern::Perl
да нет
источник

VG

Vadim Goncharov in Modern::Perl
$debug and я мог бы и сам написать
источник

VG

Vadim Goncharov in Modern::Perl
без всяких кодерефов
источник

OP

Oleg Pronin in Modern::Perl
Они приводят пример концепции где этот $debug реагирует на рантайт реконфигур
источник

OP

Oleg Pronin in Modern::Perl
Не сработает если он юзает уровни логирования
источник

VG

Vadim Goncharov in Modern::Perl
ясен пень юзаю, это чуть ли не основное удобство AE::log
источник

OP

Oleg Pronin in Modern::Perl
Они в любом логере есть который чуть более мощный чем примитивный
источник

OP

Oleg Pronin in Modern::Perl
Тогда удобного решения у тебя щас нет. Либо Смирись что будет вызываться функция и передаваться арги либо придется делать кучу переменных типа $log_debug, $log_info, $log_notice,
источник

AP

Anton Petrusevich in Modern::Perl
удобство не проблема, проблема в скорости
источник

VG

Vadim Goncharov in Modern::Perl
нет, в удобстве
источник

VG

Vadim Goncharov in Modern::Perl
Vadim Goncharov
use constant DEBUG => 0; 
use v5.18;

if (DEBUG) {
  say "debug!";
}
для скорости я могу написать вот так
источник

AP

Anton Petrusevich in Modern::Perl
это смотря ты о чём. в перле можно удобство получить любое, но оно будет стоить скорости
источник

VG

Vadim Goncharov in Modern::Perl
и он не вкомпилит вызов
источник

VG

Vadim Goncharov in Modern::Perl
ну я хочу короткое имя макроса, которое развернется в такой if, грубо говоря
источник