phone

oleg_n Ура получилось: my $soap = SOAP::Lite->new(proxy => [ 'https://vigruzki2.rkn.gov.ru/services/OperatorRequest2/?wsdl', credentials => [ "vigruzki2.rkn.gov.ru:443", "Private zone", "Ох..Логин выданный надзором", "Ох..Пароль выданный надзором" ] ],ns =>'http://vigruzki.rkn.gov.ru/OperatorRequest/'); $result = $soap->call("getResult"); $zip = decode_base64($result[1]); open F, '>'.'arch.zip' || die "Can't open arch.zip for writing!\n".$! ; binmode F; print F $zip; close F; теперь буду портить сам zapret.pl

хм, нет, изменилась, ошибка 500 Procedure 'getResult' not present

посмотрел Basic realm="Private zone" поправил, ничего не изменилось

yourrealm - что за параметр? а так, та же ошибка: 401 Unauthorized может я не понял как работает soap:lite, но для теста делаю так: и получаю ошибку

Добрый день Используем nfqfilter для блокировки и zapret.pl соотвественно для выгрузки. Осчастливил нас недавно роскомнадзор, тем, что участвуем мы в пилотной программе и порядок выгрузки малость меняется. Смысл в том, что каждому оператору связи будет выдаваться логин/пароль и под этими данными и будем получать свою выгрузку, ну и кроме полных выгрузок появятся ещё дельты. Решил пока пойти наиболее быстрым путем и просто выгружать просто полную выгрузку с нового сервиса. В качестве авторизации на сервере роскомнадзора и используется "Basic Authorization" , на php soap+basic-auth реализуется моментально, на perl не смог осилить тоже самое с модулем soap:lite. Может кто подскажет как прикрутить в перле или поделится реализованным? сейчас сделал крайне не красиво, закоментировал в zapret.pl все процедуры работы с soap а взамен вставил через system вызов php файла который и закачивает выгрузку, а далее выгрузка уже обрабатывается parseDump