0 is not the status number for Stopped, the array should be as I showed here Re^11: how to print out windows service status

my @state_name =  qw( UNKNOWN Stopped START_PENDING STOP_PENDING
                      Running CONTINUE_PENDING PAUSE_PENDING
                      PAUSED  ERROR  );
[download]

See SERVICE_STATUS structure for details