Help for this page

Select Code to Download


  1. or download this
    while( SERVICE_STOPPED != ( $State = Win32::Daemon::State() ) ){
        if( SERVICE_STARTING == $State ) {
    
  2. or download this
    Argument "SERVICE_STARTING" isn't numeric in numeric eq (==) at ...
    
  3. or download this
        if( $State == SERVICE_STARTING  )
    
  4. or download this
    if ($color eq 'red') { 
     print 'angry';
    ...
    } elsif ($color eq 'blue') {
     print 'sad';
    }