- RU.PERL ----------------------------------------------------------- RU.PERL -
Msg : #3522 [639]
От : Timur Vafin 2:5020/400 11 мая 04, 12:51
Кому : Mikhail Polykovsky 11 мая 04, 22:01
Тема : Re[2]: Проверка на вхождение в массив
-------------------------------------------------------------------------------
From: "Timur Vafin"
Tue May 11 2004 08:58, Mikhail Polykovsky wrote to Artem Chuprina:
MP>>> Вдогонку: я не подумал о том, что может понадобиться несколько раз
MP>>> проверять вхождение элемента в один и то же массив. У меня такой
MP>>> задачи не было, массивы были все время разными.
AC>> А в случае с разными массивами ты мог бы быть в курсе о наличии функции
AC>> grep()
MP> Может, ты вот это имел в виду?
[Погрызено...]
MP> sub in_hash{
MP> my $item = shift;
MP> my $arr = shift;
MP> my %hash = map {$_ => 1} @$arr;
MP> return exists $hash{$item};
MP> }
Очень занимательно :) А один раз создать хеш для поиска, и птом делать только
return exists $hash{$item};
видимо неспортивно?
[Погрызено...]
MP> Если нет, объясни плз.
MP> --
MP> Михаил Полыковский
MP> http://copi.ru/27690/
MP> Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
Всё будет хорошо....
--- ifmail v.2.15dev5.3
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/400)