Perl en Español

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

Tamaño en archivos

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Intermedio
Mensaje Vie Nov 17, 2006 10:47 am
kaeri
Perlero Nuevo
Perlero Nuevo
Registrado: 19 Ago 2004
Mensajes: 53
Ubicación: México
Tamaño en archivos Responder citando

Hola

Tengo una pregunta referente a archivos. ¿Cómo puedo hacer que al subir archivos me acepte solamente archivos menores a 100 Kb, es decir limitarlo a esto y a la vez me muestre un mensaje de que el archivo es mayor?
Mensaje Vie Nov 17, 2006 10:58 am
explorer
Moderador
Moderador
Registrado: 24 Jul 2005
Mensajes: 4225
Ubicación: Valladolid, España
Responder citando

Vete a la documentación de CGI, a la sección Avoiding Denial of Service Attacks.

Allí, verás que se puede limitar el tamaño de lo recibido poniendo, de forma local en tu script o de forma global en CGI.pm, el valor de la variable $CGI::POST_MAX.

Comenta que si el usuario intenta enviar un mensaje superior, param() devolverá una lista de parámetros vacía.

Pone como ejemplo el código
Perl:
$uploaded_file = param(’upload’);
if (!$uploaded_file && cgi_error()) {
    print header(-status=>cgi_error());
    exit 0;
}
pero recomienda que se le devuelva al usuario una página html de error.
Publicar nuevo tema   Responder al tema    Foros de discusión -> Intermedio Todas las horas son GMT - 6 Horas
Página 1 de 1



Powered by phpBB © 2001, 2005 phpBB Group