in reply to Multithread / Fork Perl Examples.
Sorry the code is a little rough, but the Sub kicks of two processes. Then it waits for the first one to finish and then the second. Check out the man page for the Win32::Process module. I hope this was of some help.BR>use Win32::Process; Start_Process(); $Process1->Wait(INFINITE); $Process2->Wait(INFINITE); sub Start_Process{ Win32::Process::Create($Process1, "c:\\close\\pfchk.exe", "pfchk", 0, DETACHED_PROCESS, "c:\\close") || die "Could not Execute Pacific Time Zone M +iss: $!\n"; } Win32::Process::Create($Process2, "c:\\close\\mfchk.exe", "mfchk", 0, DETACHED_PROCESS, "c:\\close") || die "Could not Execute Mountain Time Zone +Miss: $!\n"; } }
|
|---|