Section: User Contributed Perl Documentation (3pm)
use Net::DBus::Annotation qw(:call); my $object = $service->get_object("/org/example/systemMonitor"); # Block until processes are listed my $processes = $object->list_processes("someuser"); # Just throw away list of processes, pretty pointless # in this example, but useful if the method doesn't have # a return value $object->list_processes(dbus_call_noreply, "someuser"); # List processes & get on with other work until # the list is returned. my $asyncreply = $object->list_processes(dbus_call_async, "someuser"); ... some time later... my $processes = $asyncreply->get_data;
This module provides a number of annotations which will be useful when dealing with the DBus APIs. There are annotations for switching remote calls between sync, async and no-reply mode. More annotations may be added over time.
Daniel Berrange <[email protected]>
Tutoriais de Tecnologia Web