VPF::Получение плайлиста из SAP оповещения

kubtlt

Дата 15.7.2010, 12:37 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 15.7.2010

Репутация: нет
Всего: нет

Добрый день!
Помогите пожалуйста, в вопросе.
Необходим скрипт который будет опрашивать сервер SAP оповещения (в данном случае 224.2.127.254 http://www.ietf.org/rfc/rfc2974.txt) забирать плейлист и сохранять в файл.
Вот что у меня получается:

Код


#!/usr/local/bin/perl -w
#use strict;
use Net::SAP;
use Net::SAP::Packet;

  my $sap = Net::SAP->new( 'ipv4-global' );
  my $p = $sap->receive();
  $ipsmult = $sap->group();
  $sap->close();
  print $ipsmult;

  my $packet = new Net::SAP::Packet();
  my $type = $packet->origin_address_type();
  $packet->origin_address_type( 'ipv4' );
  my $origin = $packet->origin_address();
  $packet->origin_address( $ipsmult );

#  my $payload = $packet->payload();
# $packet->payload( kk );

С последние строки в таком виде не работают. Думаю тут еще необходимо использовать модуль Net::SDP для того, чтоб установить сессию и только потом скачать файл.
Подскажите как решить задачу подключения к SAP серверу и загрузки плейлиста.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Системное программирование \| Следующая тема »