[ic] Soft goods file download
Jason Korkin
jkorkin at korksoft.com
Wed Apr 6 16:44:56 EDT 2005
Hi all,
Having a little performance issue with regards to softgoods downloads.
We're trying to send our "large" files -- e.g. 70 - 200MB in size but they
are taking forever to begin streaming as a download. I am assuming that the
$Tag->file() is actually loading the entire file into memory before
streaming the data out...?
I'm using the following Perl/ITL:
[perl interpolate=1]
my $type = 'application/x-force-download';
my $file_loc = "upload/" . $Scratch->{username} . "/" .
$Scratch->{filename};
my $content = $Tag->file("$file_loc");
my $length = length($content);
if (! $length) {
$Scratch->{not_found} = "1";
$Document->header("Location: available.html\n\n");
$Document->hot(1);
return;
}
$Document->header("Content-Disposition: attachment;
filename=$Scratch->{filename}\nContent-Type: application/x-force-download;
name=$$
$Document->hot(1);
$Document->write($content);
return;
[/perl]
Any ideas on how I can drastically improve performance?
Thanks in advance!
Jason
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.308 / Virus Database: 266.9.3 - Release Date: 4/5/2005
More information about the interchange-users
mailing list