$ProcessObj->Wait(INFINITE);
a/ Says 'wait for ever or until the process terminates'. That stalls the creating script until the created task completes. Omit the Wait and the creating script will continue to run. You can monitor the state of the created process using the process object.
b/ I don't know
c/ Because the script isn't running until notepad closes the running text doesn't get updated until notepad closes, then gets overwritten anyway.
The following should help sort out the process stuff:
sub myjob2 { Win32::Process::Create(my $ProcessObj, "C:\\windows\\system32\\notepad.exe", "notepad noname.txt", 0, NORMAL_PRIORITY_CLASS, ".")|| die ErrorReport(); my $exitcode; $mw->update () while $ProcessObj->GetExitCode($exitcode), $exitcod +e == 259; print $exitcode; }
In reply to Re: More Perl/Tk Queries with Spawned Processes under Win32
by GrandFather
in thread More Perl/Tk Queries with Spawned Processes under Win32
by ozboomer
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |