Hola a Todos<br><br>Espero que esta sea la lista indicada para esta duda y si no, una sincera disculpa !! =o)<br><br>(Nota Aclaratoria: Soy muy novato en esto del mod_perl).<br><br>Estoy tratando de escribir un PerlTransHandler, usando mod_perl1 para interceptar todas las peticiones que se le hacen a mi servidor.<br>
Una vez que intercepte la petición, obtengo todos los parametros almacenados en $r->content o $ r->args y la idea es que les aplique<br>algún proceso y los almacene de nuevo en $r->content o $ r->args para que sigan su camino.<br>
<br>La cuestión es, que después de que obtengo dichos parámetros y por el momento solo los despliego en el log de errores, la aplicación ya no avanza; es decir no pasa de la pagina que hace el POST y por consiguiente no me muestra la pagina donde se listan los valores ya procesados.<br>
<br>El código que estoy usando es el siguiente:<br><br>package Test::test_filter;
<br>use strict;
<br>use Apache::Constants qw(:common);
<br><br>sub handler {
<br> my $r = shift;
<br> my $params = $r->method eq "POST" ? $r->content:$r->args;
<br> print STDERR "PARAMS:$params\n";<br> #HACER ALGO CON $params<br> $r->content($params);
<br> return DECLINED;
<br>}
<br>1;<br><br>Lo curioso es que si comento la linea:<br><br>my $params = $r->method eq "POST" ? $r->content:$r->args;
<br><br>todo funciona perfectamente.<br><br>Acaso me falta hacer algo ????, algo estoy haciendo mal ???? o debo usar otro tipo de Handler ???<br><br>De antemano muchas gracias por sus respuestas.<br><h1 class="ha"><span id=":yz" class="hP"><br>
</span></h1>