Size: a a a

2019 December 05

AK

Andrey Karepin in Modern::Perl
Anton Petrusevich
я просто в гугле ищу что мне надо
а надо в дакдакгоу
источник

n

naim in Modern::Perl
Михаил Иванов
и не надо никого спрашивать в мелких группах. Пишите сразу всем, на хабре, и всё тут.
Можно наверное самому за место его написать ?
источник

МИ

Михаил Иванов in Modern::Perl
naim
Можно наверное самому за место его написать ?
Что написать?
источник

n

naim in Modern::Perl
Михаил Иванов
Что написать?
Ну статью на хабре об его JSON schema
источник

VK

Vyacheslav Koval in Modern::Perl
Cyrill Novgorodcev
Господа, а как можно передать произвольное кол-во значений в конструкцию вида WHERE XXX in (?)? Ругается на то, что кол-во плесхолдеров не совпадает с количеством переданых значений.
join(',', ('?') x @arr)
источник

AP

Anton Petrusevich in Modern::Perl
Vyacheslav Koval
join(',', ('?') x @arr)
это если в @arr нет андефов
источник

A.

Anton .so in Modern::Perl
grep defined
источник

AP

Anton Petrusevich in Modern::Perl
Anton .so
grep defined
не только. надо ещё условие переписать
источник

AP

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

МИ

Михаил Иванов in Modern::Perl
naim
Ну статью на хабре об его JSON schema
Как же кто-то напишет о его модуле, если никто про него не знает? В том и суть, что написать нужно автору, чтобы другие узнали:)
источник

AK

Andrey Konovalov in Modern::Perl
коллеги, у нас есть кто-то из ru-center вроде... В общем, компания, специализарующаяся на DNS-серверах
источник

AK

Andrey Konovalov in Modern::Perl
Забыл... не RIPN же...
Нужен тестер времени DNS-отклика
источник

AK

Andrey Konovalov in Modern::Perl
Не на Perl наверное, чтобы точность была повыше.
источник

AK

Andrey Konovalov in Modern::Perl
$ fgrep VERSION /usr/lib64/perl5/AnyEvent/DNS.pm
our $VERSION = $AnyEvent::VERSION;

Хорошее ЧЮ у человека
источник

c

crux in Modern::Perl
Andrey Konovalov
Забыл... не RIPN же...
Нужен тестер времени DNS-отклика
time dig?
источник

a

allter in Modern::Perl
Andrey Konovalov
$ fgrep VERSION /usr/lib64/perl5/AnyEvent/DNS.pm
our $VERSION = $AnyEvent::VERSION;

Хорошее ЧЮ у человека
А что не так? Кстати, AE::DNS раньше был криво реализован - не работает в докере, например. В проде лучше IPшники для сервисов прописывать.
источник

AK

Andrey Konovalov in Modern::Perl
В итоге сделал на Perl'е всё же
источник

VG

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

AK

Andrey Konovalov in Modern::Perl
Вдруг кому интересно.
Локальный резолвинг(L)
 VS
powerdns-recursor с теми же серверами из resolv.conf в качестве upstream'а (R)
Before first DNS falls down:
L: 0.7 ms, R: 0.6 ms, R/L: -21.04%
L: 0.4 ms, R: 0.4 ms, R/L: 2.74%
L: 0.4 ms, R: 0.4 ms, R/L: -1.45%
L: 0.5 ms, R: 0.5 ms, R/L: -3.64%
L: 0.3 ms, R: 0.4 ms, R/L: 40.33%
L: 0.4 ms, R: 0.4 ms, R/L: -0.67%
L: 0.4 ms, R: 0.4 ms, R/L: 8.24%
L: 0.4 ms, R: 0.4 ms, R/L: 14.49%
==================================
L: 0.5 ms, R: 0.5 ms, R/L: -2.49%

After first DNS falls down:
L: 1.3 ms, R: 0.6 ms, R/L: -52.58%
L: 0.9 ms, R: 0.4 ms, R/L: -50.48%
L: 1.0 ms, R: 0.4 ms, R/L: -56.78%
L: 0.9 ms, R: 0.4 ms, R/L: -52.81%
L: 0.9 ms, R: 0.4 ms, R/L: -54.27%
L: 0.9 ms, R: 0.4 ms, R/L: -56.74%
L: 1.0 ms, R: 0.5 ms, R/L: -56.01%
L: 1.0 ms, R: 0.4 ms, R/L: -57.48%
==================================
L: 1.0 ms, R: 0.5 ms, R/L: -54.35%
источник

AK

Andrey Konovalov in Modern::Perl
Проще говоря, libresolv; продувает в 2 раза как только первый DNS становится недоступен
источник