Precisa de algum script cgi-perl que possa baixar um arquivo de uma máquina servidora. EX: clique em um link de download e ele abrirá uma janela "salvar como" e permitirá que eu salve o arquivo na minha máquina local.

Eu criei uma página web usando CGI, usando isso vou fazer upload de um arquivo para o servidor e irá executar um script perl para convertê-lo para algum outro formato (até aqui eu sou feito). Agora eu preciso recuperar esse arquivo (baixar de volta) para o 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;

Carregar um arquivo da minha máquina (cliente) para a máquina do servidor, onde eu tenho um script perl que irá converter o arquivo para outro formato e irá salvar o arquivo recém-convertido em um diretório ex: / upload-> até aqui eu terminei com script .

Agora eu preciso baixar esse arquivo de volta para a máquina do cliente usando o navegador. Neste caso, eu estava tentando baixar o arquivo testing.pm de volta para a máquina cliente.