Getting a script to re-run itself

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

Replies are listed 'Best First'.
Re: Getting a script to re-run itself by Masem (Monsignor) on Jun 26, 2001 at 01:27 UTC
Simply wrap the entire thing up in a while( $keep_running ) { } block, with $keep_running set to 1 initially, and if the user doesn't want to continue, set it to zero. Dr. Michael K. Neylon - mneylon-pm@masemware.com \|\| "You've left the lens cap of your mind on again, Pinky" - The Brain	[reply]
Re: Getting a script to re-run itself by runrig (Abbot) on Jun 26, 2001 at 01:56 UTC
While its probably better to wrap the whole thing in a while loop, and put something like this in the loop: `last if $all_done;` [download] Another idea would be to just put this at the end of the script: `exec '/my/script' unless $all_done;` [download]	[reply] [d/l] [select]
Re: Re: Getting a script to re-run itself by mr.nick (Chaplain) on Jun 26, 2001 at 02:10 UTC
Even better would be to use $0 as the parameter to exec. `exec $0 unless $all_done;` [download] That way the script can move around on the filesystem and you won't need to hand edit it. A warning: the above doesn't work correctly under Windows. For some reason, `exec $0` spawns another copy of your script in the background. If you write a small test program like: `print "hi!\n"; sleep 2; exec $0;` [download] and run it, you get the effect of: `H:\>test.pl hi! hi! H:\>hi! hi! hi!` [download] What exactly it is doing, I don't know :) mr.nick ...	[reply] [d/l] [select]