END{$obj->Kill($exitcode) if $obj->GetExitCode() == STILL_ACTIVE}; #### use Win32::Process (STILL_ACTIVE); #### END{$obj->Kill($exitcode)}; #### $ProcessObj->GetExitCode($exitcode);
## use Win32::Process (STILL_ACTIVE); ##
## END{$obj->Kill($exitcode)}; ##
## $ProcessObj->GetExitCode($exitcode);