El 20/01/06, Sebastian Bassi<[EMAIL PROTECTED]> escribió:
> Quiero por un formulario subir un archivo para despues procesarlo.
> Lo subo usando enctype="multipart/form-data" y despues supuestamente
> tengo que mandar a un archivo lo que viene via POST. Pero en lugar de
> guardar el contenido del archivo, me guarda EL NOMBRE del archivo. Lo
> que demuestra que al menos no es un problema de permisos, sino de que
> estoy mandando el nombre y no el contenido.
>
> Aca esta mi codigo CGI a ver
>
> #!/usr/bin/perl -wT
> use CGI qw(:standard);
> use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
> print header;
> print start_html("un titulo");
> my %form;
> foreach my $p (param()) {
> $form{$p} = param($p);
> print "$p = $form{$p}<br>\n";
> }
> open(INFO, '>/MICAMINOENELSERVIDOR/entrada.fasta');
> print INFO param(sequence_upload);
> #sequence_upload es la variable que guarda lo que entra por la
> variable tipo file.
> #print INFO "cadena de prueba";
> close(INFO); # Close the file
> print end_html;
>
>
>Mira no entiendo bien que es lo que hace este script que mandas pero yo tuve que hacer algo similar a lo que queres con un formulario de carga, me base en uno ya hecho y le hice algunas modificaciones, asi que te lo mando porque por ahi te sirve. Este no es la version final pero es mucho mas claro de entender, OJO!! al ser un CGI que sube un archivo a tu server tenes que extremar las medidas de seguridad. Saludos. N3krodamus
prueba3.pl
Description: Perl program
-- Para desuscribirte tenés que visitar la página https://listas.linux.org.ar/mailman/listinfo/lugar-gral/ /* Publica y encontra trabajo relacionado con softlibre en http://www.usla.org.ar/modules/jobs/ */ Si tenés algún inconveniente o consulta escribí a mailto:[EMAIL PROTECTED]
