<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman,new york,times,serif;font-size:12pt"><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;">Estaba con bastante menos parafernalia, después de mirar el manual, puse toda la parafernalia para descartar causas. Creo PerlIO viene por defecto desde la 5.6, por otra parte otra versión de Perl no funciona con con mod_perl 2.04, luego efectivamente es inútil total.<br><br>El problema es que no da salida alguna cuando falla, no hace lo que se espera que muestre "hola".<br><br>He puesto un sleep y el proceso aparece como zombie cuando falla. También he probado a cerrar la variable ( $writer ) con la dirección de STDIN y ver que devuelve, cuando falla no se puede cerrar porque ya está cerrado. Esto es, cuando falla la sentencia que escribe en la entrada no escribe nada porque está cerrado, o nunca se abrió, de
 ahí que no de salida alguna. He supuesto que spawn_proc_prog falla sin dar errores, lo curioso es falle justo a la tercera vez.<br><br>Por lo visto mod perl es muy especial para estas cosas, por ejemplo no es compatible con IPC::Open* y con IPC::Run funciona regular solo.<br><br><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><font face="Tahoma" size="2"><hr size="1"><b><span style="font-weight: bold;">De:</span></b> Salvador Fandino &lt;sfandino@yahoo.com&gt;<br><b><span style="font-weight: bold;">Para:</span></b> Lista de correo de Madrid Perl Mongers &lt;madrid-pm@pm.org&gt;<br><b><span style="font-weight: bold;">Enviado:</span></b> vie,22 enero, 2010 15:42<br><b><span style="font-weight: bold;">Asunto:</span></b> Re: [Madrid-pm] Ayuda con mod_perl y sub preocesos<br></font><br><meta http-equiv="x-dns-prefetch-control" content="off"><div style="font-family: Courier New,courier,monaco,monospace,sans-serif; font-size:
 10pt;"><div><br></div><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><div style="font-family: Courier New,courier,monaco,monospace,sans-serif; font-size: 10pt;"><br><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><font face="Tahoma" size="2"><b><span style="font-weight: bold;">From:</span></b> Skript Ke &lt;skriptke@yahoo.es&gt;<br><b><span style="font-weight: bold;">To:</span></b> madrid-pm@pm.org<br><b><span style="font-weight: bold;">Sent:</span></b> Fri, January 22, 2010 3:08:27 PM<br><b><span style="font-weight: bold;">Subject:</span></b> [Madrid-pm] Ayuda con mod_perl y sub preocesos<br></font><br>
<div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><div>El problema con el script que adjunto es que si arrancamos apache y ejecutamos el script, las primeras dos veces se ejecutará, la tercera fallará, esto es, es un script que sólo funciona el 66% de las veces que lo ejecutas :-)<br><br>El caso es que si lo dejas un rato es posible que no vuelva a dar fallos, o que vuelva a funcionar 2 de 3 veces. Además no falla, dos veces bien, una mal..<br><br>Lo he probado en varias instalaciones, todas ellas con mod perl 2.04, con el mismo resultado.<br><br>No da ningún mensaje de error. Me esta volviendo loco, ¿un bug de mod perl? ¿está bien mi script? ¿se os ocurre algo?<br></div></div></div></div></blockquote>¿Que quieres decir con que no funciona?¿te muestra una pagina 5xx?, ¿una pagina en blanco?¿que?<br><br>¿Has mirado el log del servidor web?... puedes probar
 también a añadir lineas con<br><br>&nbsp;&nbsp; warn "esto";<br>&nbsp;&nbsp; ...<br>&nbsp;&nbsp; warn "lo otro";<br>&nbsp;&nbsp; ...<br><br>que luego, mirando el log, te permitan precisar cual es el punto de fallo.<br><br>Por ultimo, creo que te puedes ahorrar toda la parafernalia de comprobar si el PerlIO esta activo o no (al menos mientras buscas la causa del problema), hoy en día no creo que queden muchos perls compilados con el PerlIO desactivado.<br><br>- Salva<br><div style="font-family: Courier New,courier,monaco,monospace,sans-serif; font-size: 10pt;"><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><div><br></div></div></div></div><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><div style="font-family: Courier New,courier,monaco,monospace,sans-serif; font-size: 10pt;"><div
 style="font-family: times new roman,new york,times,serif; font-size: 12pt;"><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;">

</div>



      </div></div></blockquote> 

</div><meta http-equiv="x-dns-prefetch-control" content="on"></div></div>
<!-- cg5.c41.mail.ird.yahoo.com compressed/chunked Mon Jan 18 08:53:33 PST 2010 -->
</div><br>



      </body></html>