Select Code to Download

use Win32::Process;
use Win32;

sub start_app {
    my ($self, $app) = @_;
...
        return 1;
   }
}

sub check_app {
...
    # All ok, just return true
    return 1;
}

sub stop_app {
...
    }

}