Net::U...nderer(3pm)
π Net::UPnP::AV::MediaRenderer β bestie edition π
okay so this is the page for Net::UPnP::AV::MediaRenderer, straight outta the User Contributed Perl Documentation collection β it's a (3pm) page, aka a Perl module manpage, and it's here to teach you how to boss around your UPnP media renderers. β¨
πΈ NAME πΈ
Net::UPnP::AV::MediaRenderer β a Perl extension for UPnP. π¦
π SYNOPSIS π
here's the whole vibe, copy-paste ready:
use Net::UPnP::ControlPoint;
use Net::UPnP::AV::MediaRenderer;
my $obj = Net::UPnP::ControlPoint->new();
@dev_list = ();
while (@dev_list <= 0 || $retry_cnt > 5) {
@dev_list = $obj->search(st =>'upnp:rootdevice', mx => 3);
$retry_cnt++;
}
$devNum= 0;
foreach $dev (@dev_list) {
my $device_type = $dev->getdevicetype();
if ($device_type ne 'urn:schemas-upnp-org:device:MediaRenderer:1') {
next;
}
my $friendlyname = $dev->getfriendlyname();
print "[$devNum] : " . $friendlyname . "\n";
my $renderer = Net::UPnP::AV::MediaRenderer->new();
$renderer->setdevice($dev);
$renderer->stop();
$renderer->setAVTransportURI(CurrentURI => 'http://xxx.xxx.xxx.xxx/xxxx.mpg');
$renderer->play();
$devNum++;
}
like, search for devices, filter for the renderer type, grab the friendly name, print it, then make a renderer object, hook it to the device, stop, set a URI, play. the whole character arc fr fr. π₯
π DESCRIPTION π
the package is a extension UPnP/AV media server. that's it, that's the description, no cap. π«Ά
β¨ METHODS β¨
π new β create new Net::UPnP::AV::MediaRenderer.
$renderer = Net::UPnP::AV::MediaRenderer();
Creates a new object. Read perldoc perlboot if you don't understand that. (ngl, if that sentence confused you, the perlboot docs are your bestie. π)
The new object is not associated with any UPnP devices. Please use setdevice() to set the device. π
π setdevice β set a UPnP devices
$renderer->setdevice($dev);
Set a device to the object. simple as. π
π setAVTransportURI β set a current content.
@action_response = $renderer->setAVTransportURI(
InstanceID => $instanceID, # 0
CurrentURI => $url, # ''
CurrentURIMetaData => $metaData, # "'
);
Set a current content to play, Net::UPnP::ActionResponse. π
π setNextAVTransportURI β set a next content.
@action_response = $renderer->setNextAVTransportURI(
InstanceID => $instanceID, # 0
NextURI => $url, # ''
NextURIMetaData => $metaData, # "'
);
Set a next content to play, Net::UPnP::ActionResponse. β¨
π play β play.
@action_response = $renderer->play(
InstanceID => $instanceID, # 0
Speed => $url, # 1
);
Play the specified content. main character energy, literally. π
π stop β stop.
@action_response = $renderer->stop(
InstanceID => $instanceID, # 0
);
Stop the playing content. periodt. π
π¦ SEE ALSO π¦
Net::UPnP::AV::ContentNet::UPnP::AV::ItemNet::UPnP::AV::Container
π 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.
and that's the whole page bestie π«Ά this copy came fromperl v5.36.0, dated2022-12-06β shoutout to the originalNet::UPnP::AV::MediaRenderer(3pm)header and footer for holding it down. now go forth and control some renderers, you iconic legend. πβ¨π
π¦ where this page comes from
- debian bookworm: libnet-upnp-perl 1.4.6-2 Β· BSD-3
- debian trixie: libnet-upnp-perl 1.4.6-2 Β· BSD-3
- ubuntu noble: libnet-upnp-perl 1.4.6-2 Β· BSD-3
- ubuntu resolute: libnet-upnp-perl 1.4.6-2 Β· BSD-3
- ubuntu stonking: libnet-upnp-perl 1.4.6-2 Β· BSD-3
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash on : a language model's rewrite of the original, under its terms