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

I should write a perl script(feat.pl), which will call a python script. I am opening the python script as a pipe command since the python script is an interactive process. After I give an input to the python script, the python script its job and I should validate if the job is executed correctly in perl script. But, before input is going to the python script, control is going to validation part My script is as below:

    #!/usr/bin/perl
    $pythonCmd = "python mobileCom.py v20 /home/omc/python/MCSimu/ior 
+332211000000009001";

    open CMD, |- , $pythonCMD;
    
    print CMD "9\n";

    Validate();

    sub Validate
    {
    print "Inside Validate
    #doing the validation here
    }

[download]

The perl script should execute line by line, but control is going to Validate() before passing "9" to the CMD. I understood that is because the python script is executed as a different thread and perl script is executed as a different thread. How can I control the execution of the perl process?

Replies are listed 'Best First'.
Re: Threads inside perl script is going out of control
by hippo (Archbishop) on Aug 22, 2014 at 08:17 UTC

    Note that $pythonCmd to which you have assigned a value is not the same as $pythonCMD which you have used in your call to open(). If you had used strict this would have been reported to you because $pythonCMD would not have been declared. But your code won't compile anyway because the print statement inside Validate() is unterminated.

    As this is therefore likely not the code which you are actually running any advice would be purely guess work. My guess is you are Suffering from Buffering.

[reply]
[d/l]
[select]
      Thanku. I got the answer for my problem. And yes this is not the original code. Due to integrity issues I couldn't give the complete code
[reply]
Re: Threads inside perl script is going out of control
by Anonymous Monk on Aug 22, 2014 at 07:54 UTC
[reply]

Back to Seekers of Perl Wisdom