http://qs1969.pair.com?node_id=313628


in reply to Re: Re: A few random questions.
in thread A few random questions.

All you need to do to run a command with options is to join them in one long string. eg.
my $process = join (" ",$execution_path, $options); system ($process);
However, this won't work with the command prompt as you can't pass further instructions to a command line without a special option switch (/K). I don't really understand why you need to open another DOS Box to run something, as the system() command will wait for the process to terminate before continuing. Nevertheless, with the /K option, your script should open a new DOS box to run the script.
my $execution_path = "cmd.exe"; my $options = "/K C:\\Perl\\Perl.exe myscript.pl"; my $process = join (" ",$execution_path, $options); system ($process);

However, if you can't get what you want out of system(), then check out Win32::Process, this has numerous facilities for creating and manipulating processes, you can even suspend or kill processes at a PID level. As for the TK question, I'm afriad that I haven't even started looking at TK yet.


Seems BrowserUK got there before me on the /K thing though....