И так парни снова начудили с РК было
dump.xml dump.xml.sig
стало
dump_20150302_180500.xml dump_20150302_180500.xml.sig
как распарсить в perl произвольное имя с расширением xml? Было так my $data = $xml->XMLin("/rzs/dump/dump.xml");. А если имя рандомное.xml?
Господа выручайте! Использую скрипт от tawer. Все прекрасно работало, но пару дней реестр перестал качаться а именно с 19 декабря. Ошибок никаких да и ничего не менялось в скрипте.
Запуск скрипта по крону.
Сначала отправляем запрос
/gost-ssl/rzs# ./download.pl 0
Затем скачиваем и парсим.
/gost-ssl/rzs# ./download.pl 1
Wide character in syswrite at /usr/lib/perl/5.14/Sys/Syslog.pm line 485.
Собственно файл с дампом перестал скачиваться. Из нового недавно РК спрашивал IP с которых будем качать мы им предоставили. Отписал в саппорт им - пока тишина.
Есть скрипт https://www.evernote.com/shard/s185/sh/ceb0b021-47e7-4c61-ab43-bc6db27fe919/c535b6e5047ec69d304519fe81c2c9ac/res/aa9ea6c4-1284-4dce-a74e-42963a7925a3/rzs.zip от ув. tawer отписал ему может допилит под новые веяния.