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

групп:

каналов:

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

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

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

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

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

go.backupland.com

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

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

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

Size: a a a

Modern::Perl

449 membersпожаловаться на группу
2021 April 13

a

allter in Modern::Perl
Меня вот смущает использование "синглтонов" в Perl. Крайний раз, как я это видел, это добавило кучи проблем вместо улучшения.

Если тебе нужно сделать класс Y, который стучится внутрь ABC - так и сделай аналогично, классовыми методами.
источник
14:38пожаловаться#1

sA

saintserge Andreev in Modern::Perl
Мне наооборот.
источник
14:40пожаловаться#2

sA

saintserge Andreev in Modern::Perl
Но я уже решил задачу.
источник
14:40пожаловаться#3

И

Игорь in Modern::Perl
Кстати, раз уж заговорили про паттерны, никто не натыкался на какую-нибудь репку с реализацией всех популярных паттернов на чистом perl без  всякого сахара в виде Moo?
источник
14:55пожаловаться#4

И

Игорь in Modern::Perl
Что-то типа вот этого, только без moo:
https://github.com/manwar/design-patterns
источник
14:57пожаловаться#5

IB

Ivan Bessarabov in Modern::Perl
Мне кажется, паттерны не особо популярны в перле
источник
14:58пожаловаться#6

IB

Ivan Bessarabov in Modern::Perl
вот в java — там да
источник
14:58пожаловаться#7

И

Игорь in Modern::Perl
Ну в любом случае интересно было бы глянуть, но в свое время нашел только то, что выше написал.
источник
15:03пожаловаться#8

И

Игорь in Modern::Perl
Плюс, в свое время, меня по паттернам поспрашивали на собеседовании, после этого мой интерес на эту тему резко вырос😁
источник
15:05пожаловаться#9

a

allter in Modern::Perl
Собственно, большинство паттернов придумано, для того что бы побороть специфические ограничения тогдашней Java (отсутствие параметрического полиморфизма, например).
источник
15:44пожаловаться#10

a

allter in Modern::Perl
Соответственно, знать их полезно (и лучше смотреть, как они делают в той же Java), а применять вместо этого родные перловые практики...
источник
15:47пожаловаться#11

DF

Denis F in Modern::Perl
Но..но..но ведь паттерны не зависят от языка программирования...
источник
16:25пожаловаться#12

МИ

Михаил Иванов... in Modern::Perl
ну а реализация зависит
источник
16:41пожаловаться#13

DF

Denis F in Modern::Perl
Ну это несомненно, но привязывать паттерны к жабе как минимум странно
источник
16:45пожаловаться#14

МИ

Михаил Иванов... in Modern::Perl
ну если чуваки там заморочились и выработали толковые решения — чего бы не посмотреть для вдохновения?
источник
16:47пожаловаться#15

a

allter in Modern::Perl
Да, но вот например вот так в Perl обычно никто не пишет.
https://github.com/manwar/design-patterns/blob/1b6196fcc95cbab8d0e5c31e875473c20cb94648/14-iterator/lib/IteratorPattern.pm#L17

Такое разделение на get_next и next в Java нужно, т.к. типы Boolean и тип значения явно отличаются. А вот в Perl для подобного обычно используется undef...
GitHub
manwar/design-patterns
Design Pattern using Modern Perl. Contribute to manwar/design-patterns development by creating an account on GitHub.
источник
16:47пожаловаться#16

R

Roman in Modern::Perl
Если undef является допустимым значением, то has_next вполне годен. Ну или из next возвращать список: значение и признак конца
источник
16:50пожаловаться#17

DF

Denis F in Modern::Perl
Ну это уже конкретные издержки реализации. Принцип работы итератора от этого не меняется.
источник
16:50пожаловаться#18

a

allter in Modern::Perl
Да, но например из-за этого ни разу в проде не видел итератора с таким look-ahead. Это уже существенный нюанс
источник
16:51пожаловаться#19

R

Roman in Modern::Perl
if (exists $hash{$key}) {
  my $val = $hash{$key};

чем не пример
источник
16:52пожаловаться#20