VK
map/grep
Size: a a a
2021 September 24
VK
$_ обязательно)
VK
perlsecret - такие примеры показать)
И
Чтобы испугался и убежал?))
VO
вот из прода что-то и дать
SZ
Блин, это проблематично :)
Ну вот есть код, а что по нему спросить -- хз
Ну вот есть код, а что по нему спросить -- хз
SZ
Ага, спасибо, эти штуки спрошу
VO
что этот код делает?
VO
ну вот нахуя ему надо будет в перловый прод лезть-то?
VO
вот для этого хуя и вопросы придумывать
VK
еще про скалярный/списочный контекст, это самое сложное для новичков в перл, и часто используемое
VO
ну не знаю, дать проблему, три куска кода и спросить какой из них более вероятно относится к проблеме и почему
VO
т.е. сэмулировать ситуацию что он зачем-то полез на перловый прод
VK
$ perl -E 'my @nums = (5, 7, 9); say @nums.length'
3
VK
$ perl -MO=Deparse,-p -E 'my @nums = (5, 7, 9); say @nums.length'
use feature 'current_sub', 'bitwise', 'evalbytes', 'fc', 'postderef_qq', 'say', 'state', 'switch', 'unicode_strings', 'unicode_eval';
(my(@nums) = (5, 7, 9));
say((@nums . length($_)));
-e syntax OK
SZ
Надо попробовать придумать, спасибо
SZ
Огонь! :)
SZ
@PerlBanjoBot
$ perl -le 'push @nums, n..q;s;; print @nums.length'SZ
Это уже плохой вариант?