Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 

Redireccionar a una pagina de error.

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> CGI
Mensaje Dom Jul 31, 2005 4:31 pm
rorris
Perlero Nuevo
Perlero Nuevo
Registrado: 14 Jun 2005
Mensajes: 21
Redireccionar a una pagina de error. Responder citando

Buenas de nuevo. Quiero redireccionar desde una pagina de mi sitio a una de las paginas de error de apache, es decir, comprobar una serie de cosas y en funcion de ellas, "engañar" al usuario redireccionandole a una pagina de error ("Internal Server Error", por ejemplo) cuando en realidad no hay ningun error. Supongo que eso no sera muy complicado hacerlo, pero he probado varias cosas y no he dado con la solucion.

Gracias, mil gracias.
Mensaje Dom Jul 31, 2005 5:06 pm
kidd
Creador de Perl en Español
Creador de Perl en Español
Registrado: 15 Oct 2003
Mensajes: 1389
Ubicación: México
Responder citando

Hola:

Es muy sencillo lograr eso usando el módulo CGI.

Código:

use CGI qw(:standard);

print header('text/html','501 Server Error');


El primer párametro que mandas es el el content-type text/html el segundo párametro es el status 501 Server Error, que puede ser cualquiera de los "status codes" de http:
http://www.helpwithpcs.com/courses/html/html_http_status_codes.htm


SALUDOS
Mensaje Lun Ago 08, 2005 11:36 am
rorris
Perlero Nuevo
Perlero Nuevo
Registrado: 14 Jun 2005
Mensajes: 21
Responder citando

No funciona. No sale ningun error pero no redirige a la pagina de error, sale en blanco.

Les muestro mi script:

use CGI qw/:standard/;

print header('text/html','501 Server Error');
exit;

Gracias.
Mensaje Mar Ago 09, 2005 2:44 pm
Perl user
Maestro Honorario
Maestro Honorario
Registrado: 03 Nov 2004
Mensajes: 385
Responder citando

rorris escribió:
No funciona. No sale ningun error pero no redirige a la pagina de error, sale en blanco.

Les muestro mi script:

use CGI qw/:standard/;

print header('text/html','501 Server Error');
exit;

Gracias.


Por qué mejor no creas una pequeña página personalizada de error y lo redirecciones hacia ella? Es una solución limpia y sencilla:

Código:

use CGI qw( :standard );

print redirect( -uri => 'http://foo.com/bar.html',
                -nph => 1,
                -status => 301
              );


o simplemente:
Código:

print redirect( 'http://foo.com/bar.html' );


Saludos,
Publicar nuevo tema   Responder al tema    Foros de discusión -> CGI Todas las horas son GMT - 6 Horas
Página 1 de 1



Powered by phpBB © 2001, 2005 phpBB Group