debian man page for net::upnp

Query: net::upnp

OS: debian

Section: 3pm

Format: Original Unix Latex Style Formatted with HTML and a Horizontal Scroll Bar

Net::UPnP(3pm)						User Contributed Perl Documentation					    Net::UPnP(3pm)

NAME
Net::UPnP - Perl extension for UPnP
SYNOPSIS
use Net::UPnP::ControlPoint; my $obj = Net::UPnP::ControlPoint->new(); @dev_list = $obj->search(st =>'upnp:rootdevice', mx => 3); $devNum= 0; foreach $dev (@dev_list) { $device_type = $dev->getdevicetype(); if ($device_type ne 'urn:schemas-upnp-org:device:MediaServer:1') { next; } print "[$devNum] : " . $dev->getfriendlyname() . " "; unless ($dev->getservicebyname('urn:schemas-upnp-org:service:ContentDirectory:1')) { next; } $condir_service = $dev->getservicebyname('urn:schemas-upnp-org:service:ContentDirectory:1'); unless (defined(condir_service)) { next; } %action_in_arg = ( 'ObjectID' => 0, 'BrowseFlag' => 'BrowseDirectChildren', 'Filter' => '*', 'StartingIndex' => 0, 'RequestedCount' => 0, 'SortCriteria' => '', ); $action_res = $condir_service->postcontrol('Browse', \%action_in_arg); unless ($action_res->getstatuscode() == 200) { next; } $actrion_out_arg = $action_res->getargumentlist(); unless ($actrion_out_arg->{'Result'}) { next; } $result = $actrion_out_arg->{'Result'}; while ($result =~ m/<dc:title>(.*?)</dc:title>/sgi) { print " $1 "; } $devNum++; }
DESCRIPTION
This package provides some functions to control UPnP devices. Currently, the package provides only functions for the control point. To control UPnP devices, see Net::UPnP::ControlPoint. As a sample of the control point, the package provides Net::UPnP::AV::MediaServer to control the devices such as DLNA media servers. As the example, please dms2vodcast.pl that converts from the MPEG2 movies to the MPEG4 one and outputs the RSS file for Vodcasting.
SEE ALSO
Net::UPnP::ControlPoint Net::UPnP::AV::MediaServer
AUTHOR
Satoshi Konno skonno@cybergarage.org CyberGarage http://www.cybergarage.org
COPYRIGHT AND LICENSE
Copyright (C) 2005 by Satoshi Konno It may be used, redistributed, and/or modified under the terms of BSD License. perl v5.10.1 2009-07-27 Net::UPnP(3pm)
Related Man Pages
net::epp::frame::command::delete::domain(3pm) - debian
net::epp::frame::command::info::domain(3pm) - debian
net::upnp::actionresponse(3pm) - debian
net::upnp::controlpoint(3pm) - debian
net::upnp::queryresponse(3pm) - debian
Similar Topics in the Unix Linux Community
S-120: Universal Plug and Play Vulnerability
Coherence 0.5.8 (Default branch)
BRisa UPnP Framework 0.8 (Default branch)
Coherence 0.6.2 (Default branch)
UPnP-Inspector 0.2.0 (Default branch)