#!/usr/bin/perl use strict; use lib qw(/usr/lib/libDrakX); use common qw(N); use AdminPanel::Services::AdminService; my $serviceMan = AdminPanel::Services::AdminService->new({icon => "/usr/share/mcc/themes/default/service-mdk.png", name => N("Services and daemons"),}); $serviceMan->start(); 1;