需要一些可以从服务器机器下载文件的 cgi-perl 脚本。EX:单击下载链接,它将打开一个“另存为”窗口,并允许我将文件保存在本地计算机上。
我已经使用 CGI 创建了一个网页,使用它我会将文件上传到服务器并运行 perl 脚本将其转换为其他格式(直到我完成)。现在我需要将此文件取回(下载回)到系统。
#!/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;
将文件从我的机器(客户端)上传到服务器机器,在那里我有一个 perl 脚本,它将文件转换为另一种格式并将新转换的文件保存到目录 ex: /upload-> 直到这里我完成了脚本.
现在我需要使用浏览器将此文件下载回客户端计算机。在这种情况下,我试图将 testing.pm 文件下载回客户端机器。