АК
Не, ну как бы, я предполагаю разумность вызывающего, и одно дело когда вместо пустой строки там undef, и совсем другое – когда какой-нибудь блесснутый массив ссылок на функции. Тут уж пусть сами разбираются, ЧТО они хотят видеть в полях!
Size: a a a
2021 May 26
АК
Впрочем, однажды perl скушал [] там, где ждал int, и я долго ломал голову в совершенно другом месте…
DF
А мог бы писать тесты и не страдать :)
YK
if (grep { $_ eq '' } @form{qw'key1 key2 ...'}) { ... }SZ
Плохое решение
SZ
list util any или самый обычный for гораздо лучше для этого подходят
SZ
Ты мог бы просто их сконкатенировать, Хех
SZ
unless length join q,,, @FORM{key1, key2, ...}IB
q,,,IB
класс =)
IB
очень смешно =)
SZ
Почему? :)
IB
фиг прочитаешь если не знаешь что такое q//
SZ
Ну это да. Но в любом случае, самый быстрый способ -- это for :)
YK
если проверить несколько значений, то пофиг - по мне что лаконичнее то и лучше, list::util нужно подключить, а for длиннее
АГ
из for ты хотя бы выйти можешь, а вот grep дойдёт до конца
YK
это да, когда дофига ключей
SZ
Если твои несколько значений надо проверять по дохулиону раз в секунду, то ...
YK
... капитан очевидность )
я не спорю, что если рассмотреть крайние случаи когда дофига ключей/итераций, то grep не оптимален
я не спорю, что если рассмотреть крайние случаи когда дофига ключей/итераций, то grep не оптимален
VG
а потом у перла репутация...