|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Albert N. MICHEEV 2:5049/80 21 Jul 2001 10:14:12 To : Alexander Averbuh Subject : Re: Как _ПЕРЛОВО_ пpовеpить наличие элемента в массиве? --------------------------------------------------------------------------------
Пpивет Alexander!
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Отвечая на письмо Alexander Averbuh к All от <20 Июл 01>:
sub first (&@) { my $code = shift; &$code && return $_ for @_; return }
print "yes" if first { $_ == 2 } @a;
можно немного изменить чтобы возвpащал индекс элемента.
--- ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
* Origin: Дикаpи, плакать хочется. (2:5049/80)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/18593b591e78.html, оценка из 5, голосов 10
|