Мне кажется, задолго до смартматча была альтернативная реализация
умеющая делать именно if $val in(@arr), но что-то вариант именно с таким
синтаксисом не нагугливается.

А any - это видимо use List::MoreUtils qw(any);

Хороший пост по теме -
http://blogs.perl.org/users/mascip/2013/05/the-clearest-ways-to-check-if-a-list-contains.html


17.09.2013 13:43, Alexey Shrub пишет:
> Вторник, 17 сентября 2013, 11:08 +04:00 от Vladimir Lettiev 
> <[email protected]>:
>> Для вашего случая предлагается прикрутить junctions:
>>     if ( $var ~~ any( @list ) ) 
> 
> Коряво достаточно, оператор in как в питоне был бы значительно лучше, по сути 
> smart match только для этого и юзаем и думаю не мы одни
> 

-- 
Best Regards,
Nick Knutov
http://knutov.com
ICQ: 272873706
Voice: +7-904-84-23-130
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить