https://www.opennet.ru/openforum/vsluhforumID9/9865.html Есть хеши: %en_US, %ru_RU. Делаю их экспорт. Простой вариант вот:<br>[code]<br>our @ISA = qw(Exporter);<br>our @EXPORT = qw(%en_US, %ru_RU, %pt_PT);<br>[/code]<br><br><br>1 - Как можно более красиво/правильно/элегантно написать вот такое - экспортировать не прямо список, а на ходу список склеить из массива? Рабочий вариант вот, но режет глаз:<br><br>[code]<br>my @langsIdPool = ('%en_US', '%ru_RU');<br>our @ISA = qw(Exporter);<br>our @EXPORT = split(' ', join(" ", @langsIdPool));<br>[/code]<br><br>2 - Вопрос аналогичный: можно ли элегантнее переписать вот это:<br>[code]<br>my @langsIdPool = ('%en_US', '%ru_RU');<br>map {<br> my %hash = eval $_;<br> Hash::Util::lock_hash_recurse( %hash);<br>} @langsIdPool;<br>[/code]<br><br>3 - Супер вопрос: а как в модуле собрать в массив все имена хешей из этого модуля?<br><br>У меня есть некая задумка: есть модуль с хешами переводов ифейса на разные языки. И я хеши не только экспортирую, но и ещё, перед экспортом, делаю с каждым хешем несколько однотипных действий. Отсюда и вопросы.<br> https://www.opennet.ru/openforum/vsluhforumID9/9865.html#2 Tue, 03 Jun 2014 10:19:02 GMT &gt; А если их будет штук двести, тоже все экспортировать?<br><br>А всё равно остаётся два места, где язык добавляется, удаляется. Т.е. хеш с именами=&gt;ссылками-контентом и сами хеши с контентом . Всё равно два раза по "двести".<br><br><br>&gt; Не проще ли обойтись хешем, где ключи - коды языков, а значения - ссылки <br>&gt; на ваши хеши? Тогда и остальные вопросы отпадут сами собой.<br><br>Но, спасибо, хеш хешей более правильно, т.к. код из головного поста потребует фокусов с use strict.<br><br>P.S. Как в анекдоте, со временем я заметил, что "our @EXPORT = ..." - это массив, куда можно делать push() в разных местах. В т.ч. делая обход ключей (id языков) в, позднее предложенном, хеше хешей.<br><br><br> https://www.opennet.ru/openforum/vsluhforumID9/9865.html#1 Wed, 28 May 2014 13:45:05 GMT Чую ошибки проектирования.<br><br>[code]<br>&gt; our @EXPORT = qw(%en_US, %ru_RU, %pt_PT);<br><br>[/code]<br><br>А если их будет штук двести, тоже все экспортировать? Не проще ли обойтись хешем, где ключи - коды языков, а значения - ссылки на ваши хеши? Тогда и остальные вопросы отпадут сами собой.<br>