Size: a a a

2021 January 12

AP

Anton Petrusevich in Modern::Perl
все практически могут отдать почту. если юзер разрешит
источник

IA

Ivan Avseyanko in Modern::Perl
Anton Petrusevich
все практически могут отдать почту. если юзер разрешит
Вот стим не может. Но у него и не Oauth. Ну... Точнее, OAuth тоже есть, но пока они OpenID поддерживают, пусть лучше так и будет. )
источник
2021 January 13

DF

Denis F in Modern::Perl
А можно ли как-то из загруженного модуля выдернуть код метода? Делаю былинные костыли :)
источник

W

Warstone in Modern::Perl
B::Deparse?
источник

DF

Denis F in Modern::Perl
Warstone
B::Deparse?
Ага, спасибо, вроде то что надо прямо в примерах есть :)
источник

SZ

Sergey Zhmylove in Modern::Perl
Denis F
Ага, спасибо, вроде то что надо прямо в примерах есть :)
Но ты имей ввиду, что это не код, а депарс. Исходник может быть очень другим
источник

DF

Denis F in Modern::Perl
Sergey Zhmylove
Но ты имей ввиду, что это не код, а депарс. Исходник может быть очень другим
да это до лампочки, главное чтобы работал одинаково.
источник

b

basiliscos in Modern::Perl
Только мне одному кажется, что B::Deparse и продакшн-код - не совсем совместимы?
источник

DF

Denis F in Modern::Perl
basiliscos
Только мне одному кажется, что B::Deparse и продакшн-код - не совсем совместимы?
Ну так я же в исходном сообщении написал что костыль делаю былинный :)
источник

b

basiliscos in Modern::Perl
а ну тогда ок
источник

DF

Denis F in Modern::Perl
Мне надо выдернуть код из нормального модуля и сунуть его в сгенерированный код, который сохранится в файл и будет запускаться сам по себе.
источник

SZ

Sergey Zhmylove in Modern::Perl
Denis F
Мне надо выдернуть код из нормального модуля и сунуть его в сгенерированный код, который сохранится в файл и будет запускаться сам по себе.
Твоя аватарка полностью отражает суть этого действа :)
источник

DF

Denis F in Modern::Perl
Sergey Zhmylove
Твоя аватарка полностью отражает суть этого действа :)
истинно сие :)
источник

DF

Denis F in Modern::Perl
Что-то я туплю, а как это работает?
push @{$self->tests}, $test;

При этом метод выглядит так:
sub tests {
   my $self = shift;
   return $self->{_Tests};
}
источник

W

Warstone in Modern::Perl
Denis F
Что-то я туплю, а как это работает?
push @{$self->tests}, $test;

При этом метод выглядит так:
sub tests {
   my $self = shift;
   return $self->{_Tests};
}
$self->tests возвращает реф на массив.
источник

DF

Denis F in Modern::Perl
Да, дошло
источник

DF

Denis F in Modern::Perl
чета попахивает эта конструкция, кмк
источник

W

Warstone in Modern::Perl
Нет. Это единственно верная при аксессорах
источник

SZ

Sergey Zhmylove in Modern::Perl
Denis F
чета попахивает эта конструкция, кмк
По-моему норм
источник

DF

Denis F in Modern::Perl
ну геттер/сеттер читабельнее, не?
источник