VG
какая магия? всё документировно в одном из самых базовых man perlref в разделе Function Templates
Size: a a a
2021 July 17
A
Прекрасно, пусть оттуда никогда не вылезает
VG
чо бы это вдруг?
VG
вполне используемый в реальных проектах прием
W
Да, откройте для себя модуль https://metacpan.org/pod/Sub::Name
VG
ну это уже сахар
W
ORM'ы смотрят на тебя как на говно.
a
Давным давно, когда у меня был 486 комп с 12MB памяти я подобным подходом экономил время компиляции и используемую RAM. Но сейчас подобное метапрограммирование имеет смысл только в особых случаях...
Ещё из этого рода:
Ещё из этого рода:
sub lazy_sub {
eval q{
no warnings 'redefine';
sub lazy_sub {
# ...
}
};
}VG
Леман такое всё еще любит
AT
Да это из стороннего модуля вылезло, Geo::IP::RU::IpGeoBase, выкинуть нафиг что-ли
A
От конструкции вида
&{ *{“::$foo”}} у меня с экрана жир потёкA
Спасибо Аллаху что я там не работаю)
W
if($class->autogenerate) {
my $isa = \@{"${dict_class}::ISA"};
push(@$isa, 'Slots::Dict::Extension::Segmentation') if $class->segmentation;
push(@$isa, 'Slots::Dict::Base');
$dict_class->make_from_RS;VG
какой ты чувствительный мальчик, Томми
VG
но про лишнесть &{} я ему уже сказал
VG
вообще на перле похоже не работаешь?
AT
Да-а, таким образом perl7 не скоро появитсч
W
Легко и просто создаем новый класс путем закидывания ему в ISA базовый класс в котором есть процедура генерации этого класса.
W
Не знаю как такой паттерн называется... Но что-то типа фабрики классов
A
Я несколько раз в реальном проекте встречал необходимость использовать конструкцию со звёздочкой и там это было нужно т.к. по-другому ну прямо совсем никак.