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

parrot.ru

Рейтинг популярных групп и каналов

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

групп:

каналов:

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

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

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

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

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

go.backupland.com

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

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

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

Size: a a a

Modern::Perl

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

2021 February 06

AS

Anton Selin in Modern::Perl

Vadim Goncharov

man perlref /autovivification

Спасибо, разобрался.
Значит, обратиться к неопределенной переменной нельзя, а присвоить можно - Perl это понимает, для него это должное поведение.
https://perlbanjo.com/9b660013e4

источник

20:59пожаловаться #1

SZ

Sergey Zhmylove in Modern::Perl

Спасибо, разобрался.
Значит, обратиться к неопределенной переменной нельзя, а присвоить можно - Perl это понимает, для него это должное поведение.
https://perlbanjo.com/9b660013e4

Понял, как это работает?

источник

23:52пожаловаться #2

2021 February 07

AS

Anton Selin in Modern::Perl

Sergey Zhmylove

Понял, как это работает?

Да. Много интересного открываю для себя... Чувствую себя таким далеким от программирования. Например, не понимал, почему в данном коде https://perlbanjo.com/abf08d8f53
ссылка на массив @array одна и та же.. Немного понадобилось времени, чтобы перестроить своё привычное мышление при программировании на 1С и всё встало на свои места -)

источник

00:01пожаловаться #3

AS

Anton Selin in Modern::Perl

Особенно интересная тема - это приоритеты операторов (когда всё в одну строчку и на первых порах сложно понять, что в какой последовательности выполняется). Встретил для себя флаг -MO=Deparse,-p - оч. помогает

источник

00:06пожаловаться #4

SZ

Sergey Zhmylove in Modern::Perl

Да. Много интересного открываю для себя... Чувствую себя таким далеким от программирования. Например, не понимал, почему в данном коде https://perlbanjo.com/abf08d8f53
ссылка на массив @array одна и та же.. Немного понадобилось времени, чтобы перестроить своё привычное мышление при программировании на 1С и всё встало на свои места -)

Ну тогда почему же @{undef} в одном случае работает, а в другом нет?

источник

00:09пожаловаться #5

SZ

Sergey Zhmylove in Modern::Perl

Да. Много интересного открываю для себя... Чувствую себя таким далеким от программирования. Например, не понимал, почему в данном коде https://perlbanjo.com/abf08d8f53
ссылка на массив @array одна и та же.. Немного понадобилось времени, чтобы перестроить своё привычное мышление при программировании на 1С и всё встало на свои места -)


sub generate_array { ($_[0], $_[0], $_[0]) }
say [generate_array($_)] for 1..5;

источник

00:16пожаловаться #6

P

PerlBanjoBot in Modern::Perl

Sergey Zhmylove


sub generate_array { ($_[0], $_[0], $_[0]) }
say [generate_array($_)] for 1..5;

ARRAY(0x55ea9ff79578)
ARRAY(0x55ea9ff796b0)
ARRAY(0x55ea9ff79620)
ARRAY(0x55ea9ff79608)
ARRAY(0x55ea9ff79560)
https://PerlBanjo.com/8a465bdbc9

источник

00:16пожаловаться #7

SZ

Sergey Zhmylove in Modern::Perl

А тут разные, хех

источник

00:16пожаловаться #8

SZ

Sergey Zhmylove in Modern::Perl

Black magic ✨

источник

00:16пожаловаться #9

AS

Anton Selin in Modern::Perl

Sergey Zhmylove

Ну тогда почему же @{undef} в одном случае работает, а в другом нет?

Не столь уверенно. Можно использовать в perl и обращение к undefined: для этого, в моем случае, необходимо убрать use strict и use v5.28.1 🤷‍♂️

источник

00:18пожаловаться #10

SZ

Sergey Zhmylove in Modern::Perl

Не столь уверенно. Можно использовать в perl и обращение к undefined: для этого, в моем случае, необходимо убрать use strict и use v5.28.1 🤷‍♂️

Неа, иди дальше переосмысляй :))

источник

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

AS

Anton Selin in Modern::Perl

Sergey Zhmylove

А тут разные, хех

Тут, кстате, понятно, почему разные: анонимный массив создается.

источник

00:19пожаловаться #12

VG

Vadim Goncharov in Modern::Perl

Особенно интересная тема - это приоритеты операторов (когда всё в одну строчку и на первых порах сложно понять, что в какой последовательности выполняется). Встретил для себя флаг -MO=Deparse,-p - оч. помогает

man perlop прям с таблица приоритетов начинается

источник

00:26пожаловаться #13

AK

Andrey Konovalov in Modern::Perl

Да. Много интересного открываю для себя... Чувствую себя таким далеким от программирования. Например, не понимал, почему в данном коде https://perlbanjo.com/abf08d8f53
ссылка на массив @array одна и та же.. Немного понадобилось времени, чтобы перестроить своё привычное мышление при программировании на 1С и всё встало на свои места -)

Откликнись на вакансию Глобус :)

источник

00:28пожаловаться #14

SZ

Sergey Zhmylove in Modern::Perl

Вот тебе ещё пища для размышлений

источник

00:39пожаловаться #15

SZ

Sergey Zhmylove in Modern::Perl

Не столь уверенно. Можно использовать в perl и обращение к undefined: для этого, в моем случае, необходимо убрать use strict и use v5.28.1 🤷‍♂️


use Data::Dumper;
my $x;
print Dumper \$x;
eval { my @a = @{$x}; 1} or print "err 1: $@";
push @{$x}, 4..6;
print Dumper \$x;
eval { my @a = @{$x}; 1} or print "err 2: $@";

источник

00:39пожаловаться #16

P

PerlBanjoBot in Modern::Perl

Sergey Zhmylove


use Data::Dumper;
my $x;
print Dumper \$x;
eval { my @a = @{$x}; 1} or print "err 1: $@";
push @{$x}, 4..6;
print Dumper \$x;
eval { my @a = @{$x}; 1} or print "err 2: $@";

$VAR1 = \undef;
err 1: Can't use an undefined value as an ARRAY reference at script.pl line 13.
$VAR1 = \[
4,
5,
6
];
https://PerlBanjo.com/8cabcc473e

источник

00:39пожаловаться #17

SZ

Sergey Zhmylove in Modern::Perl

И наверняка он не будет ругаться тут:

источник

00:40пожаловаться #18

SZ

Sergey Zhmylove in Modern::Perl


use Data::Dumper;
my $x;
print Dumper \$x;
eval { print for @{$x}; 1} or print "err 1: $@";
push @{$x}, 4..6;
print Dumper \$x;
eval { print for @{$x}; 1} or print "err 2: $@";

источник

00:40пожаловаться #19

P

PerlBanjoBot in Modern::Perl

Sergey Zhmylove


use Data::Dumper;
my $x;
print Dumper \$x;
eval { print for @{$x}; 1} or print "err 1: $@";
push @{$x}, 4..6;
print Dumper \$x;
eval { print for @{$x}; 1} or print "err 2: $@";

$VAR1 = \undef;
$VAR1 = \[
4,
5,
6
];
456
https://PerlBanjo.com/16fff2279d

источник

00:40пожаловаться #20