Size: a a a

2021 May 18

b

basiliscos in Modern::Perl
ну я уже высказывал своё мнение, что акторные фреймворки в рантайме без тредов не особо нужны, как этот. Ну и весь перл, собственно сюда относятся.
источник

VO

Vyacheslav Olkhovche... in Modern::Perl
а если на кольцах делать, то можно получить примерно 1Г messages/sec/ядро
источник

b

basiliscos in Modern::Perl
Что за кольца?
источник

VO

Vyacheslav Olkhovche... in Modern::Perl
да обычные кольцевые буфера, я себе написал такие. на сях.
источник
2021 May 19

AK

Andrey Konovalov in Modern::Perl
А нет ли готовой функции enclose где-то?
источник

AK

Andrey Konovalov in Modern::Perl
В String::Util нету
Это чтобы
enclose('{' =>'foo => bar')

{foo => bar}
источник

SZ

Sergey Zhmylove in Modern::Perl
Ээ
источник

AK

Andrey Konovalov in Modern::Perl
Шо?
источник

PV

Pingvin Valentin in Modern::Perl
Зачем? А главное нахуя?
источник

AK

Andrey Konovalov in Modern::Perl
enclose('"', 'abc')
"abc"
источник

SZ

Sergey Zhmylove in Modern::Perl
Скорее всего нет
источник

AK

Andrey Konovalov in Modern::Perl
Мне вот в одном коротком куске кода понадобилось 2 раза (например)
источник

SZ

Sergey Zhmylove in Modern::Perl
Но это ж сделать ЭЛЕМЕНТАРНО
источник

AK

Andrey Konovalov in Modern::Perl
Ну понятно, но я не XS при этом сделаю, да и зачем каждому делать одно и то же, если Unix-way - это shared code, а не говёный доскер для тупых малолетних хипстеров?
источник

SZ

Sergey Zhmylove in Modern::Perl
my %enclose = qw/ ( ) { } [ ] < >/; sub enclose { $_[0] . $_[1] . ( $enclose{$_[0]} // $_[0] ) } держи shared code, переиспользуй на здоровье
источник

W

Warstone in Modern::Perl
Ну нет. Ты не прав, конечно... enclose должно ввести еще один оп и вставлять его в вызывающее дерево, чтобы оптимизировать вызов сабы. Короче там много XS кода должно быть.
источник

AK

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

SZ

Sergey Zhmylove in Modern::Perl
Конечно, только зачем если вероятность, что оно будет тупить где-то ещё, а не на этом куске кода -- почти 100%
источник

AK

Andrey Konovalov in Modern::Perl
Моё решение как-то читабельнее 🙂 Но это ж медленно и нахрена каждый раз это писать? Я посмотрел в String::Util - там в основном какое-то непонятное никому не нужное Г 😞
источник

W

Warstone in Modern::Perl
Потому что это должно быть в сервисной либе и, чтобы ее выбрали, она должна быть быстрая.
источник