use ElectricCommander;
$cmdr = ElectricCommander->new({
server => "oswaldl-MSI",
port => "8888"
});
$cmdr->login("admin", "changeme");
$jobs=$cmdr->getJobs();
print $jobs;