if ($status{CurrentState} eq 4 )
       {print MYFILE " ServiceStatus: ", $hostname, " ", $servicename, " ", "is running\n";}
       else {print MYFILE " ServiceStatus: ", $hostname, " ", $servicename, " ", "is not running\n";}