use 5.16.2;
use warnings;
use Net::DBus;
use Data::Peek;
my $bus = Net::DBus->find or die "Cannot connect to DBus\n";
my $hal = $bus->get_service ("org.bluez") or die "Cannot get Handle\n";
####
org.freedesktop.DBus.Error.ServiceUnknown: The name org.bluez was not provided by any .service files
####
$ cat /etc/systemd/system/dbus-org.bluez.service
[Unit]
Description=Bluetooth service
Documentation=man:bluetoothd(8)
ConditionPathIsDirectory=/sys/class/bluetooth
[Service]
Type=dbus
BusName=org.bluez
ExecStart=/usr/lib/bluetooth/bluetoothd
NotifyAccess=main
#WatchdogSec=10
#Restart=on-failure
CapabilityBoundingSet=CAP_NET_ADMIN CAP_NET_BIND_SERVICE
LimitNPROC=1
ProtectHome=true
ProtectSystem=full
[Install]
WantedBy=bluetooth.target
Alias=dbus-org.bluez.service