Сравнение многомерных массивов в Perl

[Podedinov]

Если кто знает помогите: есть двухмерный массив с данными о пользователе

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

@user_date = [$user][$mac];

и массив данных с Dlinka

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

@dlink_date = [$vlan][$name][$mac][$port][$type];

Как можно сравнить эти два массива по полю [$mac] чтобы в массиве @dlink_date или в новом массиве остались только строчки где [$mac] поля равны?

[Хостинг 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/

[hizel]

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

@user_data = (
                     [$user, $mac], 
                     [$user,$mac]
                     ...
                    )
@dlink_data = (
                     [$vlan,$name,$mac,$port,$type],
                     [$vlan,$name,$mac,$port,$type]
                     ...
                    )

может такие у вас структуры, ибо я не поверю, что вы данные о маках на портах комутаторов храните в пятимерном масиве :-|