On 05/17/13 14:42, Andrew Shitov wrote: > А кто-нибудь еще использует ~~? Можете показать примеры? $str ~~ $array_ref Без ~~ придётся писать гораздо длиннее: ref $array eq 'ARRAY' && grep { $str eq $_ } @$array_ref