GetStatus method

The GetStatus method returns hash with informations about a service
Syntax
Win32::Service::GetStatus($HostName,$Service,*StatusInfo);
$HostName Name of the host, '' for local or '\\\\MyComputer'.
$Service Service registry key name.
*Status_Info Reference to a hash, see table below.


StatusInfo
WaitHint Amount of milliseconds, that the service expects any operation to take.
CheckPoint Value that the service increments periodically to report its progress. Zero when the service does not have a any operation pending.
Win32ExitCode Win32 error code that the service uses when an error occurs.This value soubl be zero when it is running and on normal termination.
ServiceType Indicates the type of service.
ServiceSpecificExitCode Service specific error code.
CurrentState Indicates the current state of the service.
ControlsAccepted Specifies the control codes that the service will accept and process.

Example

use Win32::Service;
my ($key, %service, %status, $part);

Win32::Service::GetServices('',\%services);

foreach $key (sort keys %services)
{
print "Display Name\t: $key, $services{$key}\n";
Win32::Service::GetStatus( '',$services{$key}, \%status);
foreach $part (keys %status)
{
print "\t$part : $status{$part}\n";
}
}