Close script with open system call

Phweda has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Close script with open system call by kennethk (Abbot) on Feb 27, 2020 at 13:10 UTC
As documented in system: Does exactly the same thing as exec, except that a fork is done first and the parent process waits for the child process to exit. So, if you don't want to wait for the child process to exit (e.g., someone to close the text editor), change that to an exec. It will change the executing process -- mind body and soul -- to be the running text editor, giving up control forever. You also can remove the exit in that case, too. Please note that exit is almost never what you actually mean to do if you don't need to return a status code. Just let the script roll off the end. #11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.	[reply]
Re^2: Close script with open system call by Phweda (Initiate) on Feb 27, 2020 at 14:37 UTC
Thanks all exec was what I needed.	[reply]
Re: Close script with open system call by Eily (Monsignor) on Feb 27, 2020 at 13:39 UTC
If the issue is that you only want one process to be executing at the end of your script, or you want the end of script clean-up to be triggered exec should do fine. If you want to get back control in the console, then neither system nor exec will do what you want, as in the first case the process you started by calling the script will wait for the editor to close, and in the second the process will turn into the editor's, so by definition won't have stopped until the editor has stopped. On linux fork can be used like this: `fork and exit; exec($command)` [download] Which will do what you want (a new process will be created, but the parent won't wait for it before exiting). On Windows I don't know... (it might work with the correct build of perl, it doesn't with my strawberry perl 5.30). You might want to redirect the editor's output as well, if you don't want messages to pop up in your console. Edit: a simple test to demonstrate (using linux quotes since fork isn't implemented in my Windows perl) `perl -E 'fork and exit; exec q<perl -E "sleep 10; say 1">'` [download] You then have 10 seconds to try and execute other commands before the 1 is displayed.	[reply] [d/l] [select]
Re: Close script with open system call by 1nickt (Canon) on Feb 27, 2020 at 12:30 UTC
Hi, maybe you want exec instead? The way forward always starts with a minimal test.	[reply]
Re: Close script with open system call by ForgotPasswordAgain (Priest) on Feb 27, 2020 at 13:36 UTC
It's weird to try to execute a log file. Do you want to run `$ENV{PAGER}` on it or something?	[reply] [d/l]
Re^2: Close script with open system call by bliako (Monsignor) on Feb 27, 2020 at 23:02 UTC
occam's razor in practice	[reply]
Re: Close script with open system call by NERDVANA (Deacon) on Feb 27, 2020 at 19:42 UTC
I’m assuming you are on Windows if you are executing a log file and getting the result you expected. (having it open in notepad or whatever) The more official way to do this is with the ShellExecute Win32 API function. Looks like the Win32::FileOp module can do this. I believe the perl script will continue running without waiting for Notepad to exit, so you can end the perl script more gracefully than with exec. This was previously answered in Launching a data file in Win32 using the assciated application automatically	[reply]