Hi,

I am having a problem on 242 servers where my service is running but not
doing what it is supposed to do.
I added the debug line as shown below.  I am getting first *SERVICE_STOPPED*,
then *SERVICE_NOT_READY* after that.  I never get *SERVICE_RUNNING* on
these machines.  On other machines it appears to be working fine without
issue.

Do you have any idea what I can do to fix this?  I really need to get this
fixed ASAP.

sub Callback_Running {
    my ($Event, $Context) = @_;
*print "State: " . Win32::Daemon::State();*
    if (SERVICE_RUNNING == Win32::Daemon::State()) {
        # do stuff

The OS is Server 2012 R2 Standard 64-bit v6.3.9600 running Strawberry Perl

Thanks,


John Simpson
724-554-4464

Reply via email to