https://www.opennet.ru/openforum/vsluhforumID8/7839.html Не уверен что в нужном разделе, но все же...<br>На просторах инета нашел perl скрипт для автоматической регистрации зон DNS с PRIMARY на SLAVE сервере.<br><br>Файл из 2-х частей, сам скрипт соответственно <br>http://www.tourservice.kz/docs/ru/blog/2010/2/19/zoneadd<br>и <br>http://www.tourservice.kz/docs/ru/blog/2010/2/19/zoneadd.conf<br>conf файл настройки.<br><br>Попробовал с дебагом, получилось<br><br>main::(zoneadd:9): my (оg);<br> DB&lt;1&gt; n<br>main::(zoneadd:10): open CFG,'/etc/zoneadd.conf' or die '/etc/zoneadd.conf '.$!;<br> DB&lt;1&gt;<br>main::(zoneadd:11): my $cfg=join "\n", &lt;CFG&gt;;<br> DB&lt;1&gt;<br>main::(zoneadd:12): close CFG;<br> DB&lt;1&gt;<br>main::(zoneadd:13): eval "$cfg";<br> DB&lt;1&gt;<br>main::((eval 8)[zoneadd:13]:1): my оg=(<br> DB&lt;1&gt;<br>main::(zoneadd:14): die $@ if $@;<br> DB&lt;1&gt;<br>main::(zoneadd:18): if ( $cfg{'daemon'} ) {<br> DB&lt;1&gt;<br>main::(zoneadd:30): open ZONES, $cfg{'named.conf'} or die $cfg{'named.conf'}." ".$!;<br> DB&lt;1&gt;<br>Use of uninitialized value in open at zoneadd line 30.<br> at zoneadd line 30<br>Use of uninit https://www.opennet.ru/openforum/vsluhforumID8/7839.html#9 Mon, 24 Feb 2014 11:43:55 GMT &gt; i like it <br><br>just do it<br><br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#8 Mon, 24 Feb 2014 05:06:07 GMT &gt; блин чуваг, проще заново накидать скритягу чем в чужой разбираться )) <br><br>конечно, согласен, но иногда хочется посмотреть как реализовано другими,<br>попытаться разобраться в чужом коде - это тоже стимулирует серые клеточки головного мозга,<br>чему-то новому учишься и т.д, в общем, i like it<br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#7 Mon, 24 Feb 2014 04:11:48 GMT &gt;&gt;&gt; Спасибо. Потестил )) <br>&gt;&gt;&gt; скрипт рабочий, просто там как в известном анекдоте - доработать напильником <br>&gt;&gt; ты его две недели пилил и тестил? )) <br>&gt; да! ну не все две недели, конечно, но - то времени не <br>&gt; было, <br>&gt; то косяки в коде вылазить начали, причём, вроде и мелкие и разные, <br>&gt; но блин задёргали, <br>&gt; то у меня в конфиге named.conf с notify, короче, вот так и <br>&gt; растянулась "доработка напильником" <br><br>блин чуваг, проще заново накидать скритягу чем в чужой разбираться ))<br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#6 Mon, 24 Feb 2014 02:00:25 GMT &gt;&gt; Спасибо. Потестил )) <br>&gt;&gt; скрипт рабочий, просто там как в известном анекдоте - доработать напильником <br>&gt; ты его две недели пилил и тестил? )) <br><br>да! ну не все две недели, конечно, но - то времени не было,<br>то косяки в коде вылазить начали, причём, вроде и мелкие и разные, но блин задёргали,<br>то у меня в конфиге named.conf с notify, короче, вот так и растянулась "доработка напильником"<br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#5 Sun, 23 Feb 2014 18:40:21 GMT &gt; Спасибо. Потестил )) <br>&gt; скрипт рабочий, просто там как в известном анекдоте - доработать напильником <br><br>ты его две недели пилил и тестил? ))<br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#4 Sat, 22 Feb 2014 04:52:41 GMT &gt; Никто случаем не делал себе такую штуку?<br><br>Спасибо. Потестил ))<br><br>скрипт рабочий, просто там как в известном анекдоте - доработать напильником<br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#3 Wed, 12 Feb 2014 17:30:45 GMT &gt; Не знаешь что сказать - промолчи, будешь выглядеть умнее (народная мудрость) <br><br>какую именно фразу не смог осилить?<br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#2 Wed, 12 Feb 2014 16:56:07 GMT &gt; ЗЫ А смешной такой пост: я скачал хрень, зачем не знаю, как <br>&gt; работает не понимаю, как-то запустил, почемуто не запустилось не запустилось, <br>&gt; куда меня скрипт послал перевести не могу - памахите христа ради <br>&gt; ... )) <br><br>Не знаешь что сказать - промолчи, будешь выглядеть умнее (народная мудрость)<br> https://www.opennet.ru/openforum/vsluhforumID8/7839.html#1 Wed, 12 Feb 2014 14:05:10 GMT &gt; На просторах инета нашел perl скрипт для автоматической регистрации зон DNS с PRIMARY на SLAVE сервере.<br><br>регистрации?<br><br>&gt; В perl не очень то разбираюсь. <br><br>нуу не разбираешься в перле, возми grep, awk, sed и тд, THIS IS SPAAAA^W UNIX WAY!<br>выдернуть имена примари, по шаблону сформировать кусок конфига, отправить по фтп на другой сервер - както так если в общем<br><br>&gt; А данная фича очень нужна на сервере.<br><br>ээээээ я думаю должено буть хотябы два сервера ...<br><br>&gt; Никто случаем не делал себе такую штуку?<br><br>у тебя тысячи зон и они меняются ежедневно?<br><br>ЗЫ А смешной такой пост: я скачал хрень, зачем не знаю, как работает не понимаю, как-то запустил, почемуто не запустилось не запустилось, куда меня скрипт послал перевести не могу - памахите христа ради ... ))<br>