DF
ну кому-то наверняка понятно, но мне некоторые конструкции не знакомы, а смысл некоторых я понять не могу
через perltidy прогони и станет нормально читаться
Size: a a a
2020 October 20
VO
да пробелы-то с переносами я расставить могу, но скажем ! у меня вызывает недоумение.
AU
%$_[0] с двойкой в качестве первого параметра даёт проверку на чётность, дальше разбираться легче.
c
perl -MO=Deparse -e 'sub by{map{[splice@_,1,$_[0]]}!($#_%$_[0])..$#_/$_[0]}'
sub by {
map {[splice(@_, 1, $_[0])];} !($#_ % $_[0]) .. $#_ / $_[0];
}
-e syntax OKвот замечательная тулза
AK
perl -MO=Deparse -e 'sub by{map{[splice@_,1,$_[0]]}!($#_%$_[0])..$#_/$_[0]}'
sub by {
map {[splice(@_, 1, $_[0])];} !($#_ % $_[0]) .. $#_ / $_[0];
}
-e syntax OKвот замечательная тулза
Так List::Util::XS же
c
скучно
VG
VG
> yuki
онемэ детектед
онемэ детектед
AK
Кадзиура!
AK
тебе на yoko
c
как же удобно в раку сделано:
~ raku -e 'for <a b c d> -> $a, $b { "$a, $b".say }'
a, b
c, dVG
а почему угловые скобки-то
c
это аналог qw()
VG
да ну его в сраку этот раку
AK
да ну его в сраку этот раку
удобно же
AK
а почему угловые скобки-то
AK
Вот где угловые скобки вообще для всего.
DS
И чо? Это одно и то же
DS
Применение одно, в смысле