- RU.PERL ----------------------------------------------------------- RU.PERL - Msg : #3523 [639] От : Mikhail Polykovsky 2:5020/400 11 мая 04, 13:03 Кому : Timur Vafin 11 мая 04, 22:01 Тема : Re[3]: Проверка на вхождение в массив ------------------------------------------------------------------------------- From: Mikhail PolykovskyMP>> sub in_hash{ MP>> my $item = shift; MP>> my $arr = shift; MP>> my %hash = map {$_ => 1} @$arr; MP>> return exists $hash{$item}; MP>> } TV> Очень занимательно :) А один раз создать хеш для поиска, и птом делать TV> только return exists $hash{$item}; видимо неспортивно? Если бы ты читал всю ветку, ты бы встретил такую фразу: MP> Вдогонку: я не подумал о том, что может понадобиться несколько раз MP> проверять вхождение элемента в один и то же массив. У меня такой MP> задачи не было, массивы были все время разными. -- Михаил Полыковский http://copi.ru/27690/ Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru --- ifmail v.2.15dev5.3 * Origin: UTC (2:5020/400)