Телеграмм чат группы modernperl страница 8439

Size: a a a

Modern::Perl

416 membersпожаловаться на группу

2021 January 14

Artem Tepponen in Modern::Perl

Не понял?

источник

01:52пожаловаться #1

Michael Shulichenko in Modern::Perl

источник

01:55пожаловаться #2

Sasha Murzin in Modern::Perl

а накидай с пикабу еще картинок

источник

02:27пожаловаться #3

Sergey Zhmylove in Modern::Perl

Michael Shulichenko

вообще то нет, но 20$ это 20$

++👍

источник

10:16пожаловаться #4

Sergey Zhmylove in Modern::Perl

Artem Tepponen

А s,foo,bar, считается нормальным code style?

А чем тебе не нравится? В синтаксисе четко написано: делай раз, делай два

источник

10:17пожаловаться #5

Sergey Zhmylove in Modern::Perl

Я ж не написал samara

источник

10:17пожаловаться #6

Denis F in Modern::Perl

Sergey Zhmylove

Ничего поднимать не нужно. Просто сунь свой код в мою функцию и проверь

Поглядел на код - он работает не мне как надо. У тебя в выводе:

{
    use warnings;
    use strict;
    use feature 'say';
    require Zdravstvuy::Zhopa::Noviy::God;
    some_other_code();
}

А мне надо содержимое Zdravstvuy::Zhopa::Noviy::God->some_sub()

источник

11:25пожаловаться #7

Sergey Zhmylove in Modern::Perl

Denis F

Поглядел на код - он работает не мне как надо. У тебя в выводе:

{
    use warnings;
    use strict;
    use feature 'say';
    require Zdravstvuy::Zhopa::Noviy::God;
    some_other_code();
}

А мне надо содержимое Zdravstvuy::Zhopa::Noviy::God->some_sub()

Я тебя не понимаю :(
Если ты дашь мне исходники, то я покажу, как достать нужное.

источник

11:27пожаловаться #8

Denis F in Modern::Perl

ща накидаю пример

источник

11:27пожаловаться #9

Denis F in Modern::Perl

Как-то так:

package Foo;
use strict;
use warnings;
use Module::Not::In::INC;


sub new {
    bless {}, shift;
}

sub foo {
    my $self = shift;
    
    my $unknown = Module::Not::In::INC->new();
    
    $unknown->some_action();
}

1;

мне нужен текст сабы foo

источник

11:32пожаловаться #10

Sergey Zhmylove in Modern::Perl

Denis F

Как-то так:

package Foo;
use strict;
use warnings;
use Module::Not::In::INC;


sub new {
    bless {}, shift;
}

sub foo {
    my $self = shift;
    
    my $unknown = Module::Not::In::INC->new();
    
    $unknown->some_action();
}

1;

мне нужен текст сабы foo

https://perlbanjo.com/6a605c65d0

источник

11:34пожаловаться #11

Sergey Zhmylove in Modern::Perl

Denis F

Как-то так:

package Foo;
use strict;
use warnings;
use Module::Not::In::INC;


sub new {
    bless {}, shift;
}

sub foo {
    my $self = shift;
    
    my $unknown = Module::Not::In::INC->new();
    
    $unknown->some_action();
}

1;