Perl CGI para descargar un archivo a través del navegador web.

Necesita algún script cgi-perl que pueda descargar un archivo desde una máquina servidor. EX: hacer clic en un enlace de descarga, se abrirá una ventana "guardar como" y me permitirá guardar el archivo en mi máquina local.

He creado una página web utilizando CGI, utilizando esto cargaré un archivo en el servidor y ejecutaré un script en perl para convertirlo a otro formato (hasta que termine). Ahora necesito recuperar este archivo (descargarlo de nuevo) en el sistema.

#!/usr/bin/perl
#print "Content-type: text/html\n\n";
my $filepath='/upload/testing.pm';

    print "Content-Type: text/html\n\n";

    open("DOWNLOADFILE", "<".$filePath);
    while($fileContents = <DOWNLOADFILE>) {
        print $fileContents;
    }
print "Content-Type: text\n";
print "Content-Disposition: attachment; filename='testing.pm'\n";
print "Content-Description: File to download\n\n";
    close DOWNLOADFILE;

Cargar un archivo de mi máquina (cliente) a la máquina del servidor, donde tengo una secuencia de comandos perl que convertirá el archivo a otro formato y guardará el archivo recién convertido en un directorio ex: / upload-> hasta aquí he terminado con las secuencias de comandos .

Ahora necesito descargar este archivo de nuevo a la máquina cliente usando el navegador. En este caso, estaba intentando descargar el archivo testing.pm de nuevo a la máquina cliente.

Respuestas a la pregunta(2)

Su respuesta a la pregunta