• Publicidad

Envío de un archivo

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Envío de un archivo

Notapor Fegna » 2009-06-16 15:01 @667

Hola,

Estoy tratando de enviar un archivo CSV, para ello tengo el html con:
Sintáxis: [ Descargar ] [ Ocultar ]
  1. <input name="myfile" type="file" size="30" /> 


En el cgi tengo:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
       
        my ($myrut, $query, $template_dir) = @_;
        my ($L_html, $myfile, $mymail, $myfile2, $file_name, $dir);
        my ($resp, $temporal, $trs_finiquitos, $resp1);
       
        $myfile = $query->param('myfile');
        $mymail = $query->param('email');
        $L_html = "";

        if (-f $myfile)
        {...
        }
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4


Entiendo que la instrucción if(-f $myfile) me indica si es o no archivo, sin embargo siempre me dice que no (aunque esté enviando uno válido).

Gracias
Fegna
Perlero nuevo
Perlero nuevo
 
Mensajes: 28
Registrado: 2008-01-08 09:29 @437
Ubicación: Santiago, Chile

Publicidad

Notapor explorer » 2009-06-16 15:16 @678

Te falta hacer el proceso de abrir el fichero y escribirlo en el directorio donde quieres guardarlo definitivamente.

Repasa el tutorial Upload de archivos de este web.

Hay más hilos en el foro hablando del tema de subir ficheros. Busca por la palabra 'upload'.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14482
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Gracias

Notapor Fegna » 2009-06-16 16:48 @741

El problema estaba que el form no era enctype="multipart/form-data".

Cambiado eso funcionó perfecto.

Gracias por la ayuda.
Fegna
Perlero nuevo
Perlero nuevo
 
Mensajes: 28
Registrado: 2008-01-08 09:29 @437
Ubicación: Santiago, Chile


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados