dionys

Использую Syntax::Keyword::Try. Он работает как расширение языка, а не как обёртка над eval, поэтому не имеет большинства ограничений модулей типа Try::Tiny.

Вот так { 'user_id' => 'post.author' } названия полей сравнивать нельзя. DBIC в этом случае считает, что справа данные, генерирует условие user_id = ? и пытается подставить текст для сравнения с числовым полем.

Правильное сравнение должно выглядеть так: { 'me.user_id' => { -ident => 'post.author' } }.

perl script.pl -host ya.ru > out.txt 2>&1

Достаточно такого однострочника:

perl -p -e 's/foo/bar/g' *.txt > result.txt

Это не ошибки, а предупреждения компилятора. Не надо обращать на них внимание, если тесты пройдут без ошибок:

make & make test & make install

Внутри модуля контроллера $self указывает на контроллер, внутри модуля приложения — на приложение.

Задавать секрет нужно один раз в методе startup приложения:

sub startup {
    my ($app) = @_;
    $app->secrets(['secret']);
    ...
}

perl -Mojo -E 'say g("http://2ip.ru/")->dom("#d_clip_button")->text'

Операция `` возвращает список строк. В цикле for каждая строка неявно попадает в специальную переменную $_. Следующая операция m// также неявно работает с этой переменной. В явном виде цикл будет выглядеть так:

for my $_ (`cat /proc/mounts`) {
    ($fsname, $fstype) = $_ =~ m/\S+ (\S+) (\S+)/;
    ...
}

Возможны следующие варианты:

• XS через C: perldoc.perl.org/perlxstut.html
  
• Inline: https://metacpan.org/pod/distribution/Inline-CPP/l...
  
• Inline через C: metacpan.org/pod/distribution/Inline-C/lib/Inline/C.pod
  
• FFI через C: https://metacpan.org/pod/FFI