Win32::Service::GetStatus('localhost', 'Apachi2.2', $stat);
print Dumper $stat, $^E;

$VAR1 = {};
$VAR2 = 'Der angegebene Dienst ist kein installierter Dienst';