0

在我的 .pm 文件中,我使用内容类型为 text/html,来编写网页的源代码。我还需要编写一个下载代码,为此我需要将我的内容类型指定为“Content-Type:application/x-download”。我尝试在我的 .pm 文件本身中使用它,但浏览器会感到困惑并在网站上打印上面引用的行。因此,我将在单独的 .cgi 文件中编写以下下载代码。现在,我需要从 .pm 文件中调用这个 .cgi 文件,并且还需要将参数传递给 .cgi 文件。请帮忙?我试过的是:

.pm 文件:

...
system('downloadscript.cgi', $fileholder);
...

.cgi 文件:

#!/usr/bin/perl
use strict;
use warnings;
use CGI ':standard';
use CGI::Carp qw(fatalsToBrowser);

my $ID = "sample.txt";
my $fileholder = shift;  

if ($ID eq '') {   
print "Content-type: text/html\n\n";   
print "You must specify a file to download.";   
} else {  
print "Content-Type:application/x-download\n";   
print "Content-Disposition:attachment;filename=$ID\n\n";  
print $fileholder;  
}

当我执行此操作时,没有任何反应。任何帮助将不胜感激。

4

1 回答 1

0

在 .pm 文件中调用 cgi 文件没有帮助,创建 .pm 文件的包装器并调用 cgi 文件

于 2013-07-03T03:47:02.697 回答