Сравнение переменной с элементами массива в Perl

И всё прочее, что касается HTML
Правила форума
Убедительная просьба юзать теги [code] при оформлении листингов.
Сообщения не оформленные должным образом имеют все шансы быть незамеченными.
Podedinov
мл. сержант
Сообщения: 84
Зарегистрирован: 2008-12-28 11:50:19

Сравнение переменной с элементами массива в Perl

Непрочитанное сообщение Podedinov » 2011-03-07 9:48:59

Есть переменная $mac_drop она содержит мак для блокировки и есть массив маков @mac_all. Вопрос: как мне найти например мак 00:00:00:11:11:11 содержащий в переменной $mac_drop в массиве @mac_all, чтобы в результате мне он выдал значение $mac_all[$i]

Хостинговая компания Host-Food.ru
Хостинг HostFood.ru
 

Услуги хостинговой компании Host-Food.ru

Хостинг HostFood.ru

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

Аватара пользователя
vadim64
майор
Сообщения: 2101
Зарегистрирован: 2009-09-17 15:15:26
Откуда: Засратовец

Re: Сравнение переменной с элементами массива в Perl

Непрочитанное сообщение vadim64 » 2011-03-07 13:41:47

сделайте цикл с одним условием
Люди не делятся на национальности, партии, фракции и религии. Люди делятся на умных и дураков, а вот дураки делятся на национальности, партии, фракции и религии.

Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: Сравнение переменной с элементами массива в Perl

Непрочитанное сообщение ProFTP » 2011-03-07 14:21:12

Podedinov писал(а):Есть переменная $mac_drop она содержит мак для блокировки и есть массив маков @mac_all. Вопрос: как мне найти например мак 00:00:00:11:11:11 содержащий в переменной $mac_drop в массиве @mac_all, чтобы в результате мне он выдал значение $mac_all[$i]

Код: Выделить всё

perl -e 'print grep {/1/} qw(1 2 3)'
выведет элемент или тебе надо индекс?
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение