END{$obj->Kill($exitcode) if $obj->GetExitCode() == STILL_ACTIVE};