[bcn-pm] download archivo en cgi
carlos escribano
ces at buki.dyndns.org
Sun Jun 29 14:49:12 CDT 2003
El Domingo 29 Junio 2003 20:37, Xavier Noria escribió:
> Enviando
>
> Content-Type: application/x-tar
> Content-Encoding: x-gzip
>
> no funciona tampoco?
No, esa codificación (y otras que he probado) no van.
He hecho un script aislandolo del resto, quedando así:
#!/usr/bin/perl
my $dir="/tmp";
my $filename="weave";
open DOWNLOAD, $dir . '/' . $filename . '.tar.gz';
#binmode(DOWNLOAD);
binmode STDOUT;
#select STDOUT; $|=1;
my @info = stat(DOWNLOAD);
my $length = $info[7];
my $blksize = $info[11] || 16384;
print "Content-Type: application/x-tar\n";
print "Content-Encoding: x-gzip\n";
#print "Content-type: application/x-zip-compressed\n";
print "Content-Disposition: attachment; filename=\"". $filename .
".tar.gz\"\n";
print "Content-Length: $length\n\n";
binmode(DOWNLOAD);
my $buffer;
while (!eof(DOWNLOAD)) {
read(DOWNLOAD, $buffer, $blksize);
print $buffer;
}
close(DOWNLOAD);
exit;
Y sigue igual. Tienes apache instalado? A ver si podrias probarlo, cambiando
el valor de my $dir, apuntando a donde haya algun tarball, y poniendo en my
$filename el nombre sin ruta ni extensión.
Estoy mirando en las directivas de Apache y no veo nada referente a no admitir
las cabeceras http.
More information about the Barcelona-pm
mailing list