I am trying to call system commands from perl, using system().

That usually works fine, but when I don't start the perl script myself, but have a compiled C program run it using the C popen() function, then perl is not able to execute its system commands. Perl's system() then returns with exit code 13.

It works only if I use the backticks in Perl, instead of system. Does anyone know why?

link|improve this question

38% accept rate
Backticks return the standard output of the executed process, not the return value. That may explain why you're seeing it "work" with backticks-- your not actually getting the return value. – Evan Anderson Jul 21 '10 at 0:27
@Evan: I can see the stderr output of my process when I start it with the backticks. When I start it with system() I don't see anything, but get the bad return value ... – user9474 Jul 21 '10 at 0:39
I noticed that also the pclose() function in my C program returns code 13, after executing the perl script using popen. Maybe it's the system setup here ... – user9474 Jul 21 '10 at 0:41
You might want to check permissions. An exit code of 13 typically is an access denied. – Zoredache Jul 21 '10 at 1:06
Strange. I don't know why pclose would give this error. I can see that it successfully executed the perl script. – user9474 Jul 21 '10 at 1:08
show 2 more comments
feedback

1 Answer

It would help to see some of your code/output. Here's my guess at the root cause of your problem.

First, signal 13 equates to SIGPIPE, which in this case seems to indicates the perl process is attempting to write to a pipe (i.e. STDOUT/STDERR), but nothing is there to read it.

I tested a bit and my question is, are you handling the output from the the script within your C program? In my tests, simply processing the output of the perl script avoided the SIGPIPE error.

Signal 13 produced:

fp = popen("/home/chuckx/perl-test/perl.pl","r");
status = pclose(fp);

Signal 13 avoided:

fp = popen("/home/chuckx/perl-test/perl.pl","r");

do {} while (fgets(output,80,fp) != NULL);

status = pclose(fp);
link|improve this answer
feedback

Your Answer

 
or
required, but never shown

Not the answer you're looking for? Browse other questions tagged or ask your own question.