- while (1) {
- eval {
- # Try to call python and run our command
- $pid=open2(*IN, *OUT, "python", "-c", $pyCmnd)
- or return $content;
- };
- last unless $@;
- $tries--;
- if ($tries < 1) {
- debug("failed to run python to convert rst: $@");
- return $content;
- }
- }
+ my $sigpipe=0;
+ $SIG{PIPE}=sub { $sigpipe=1 };
+ $pid=open2(*IN, *OUT, "python", "-c", $pyCmnd);
+