在我的.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;
}
当我执行此操作时,没有任何反应。任何帮助将不胜感激。
答案 0 :(得分:0)
在.pm文件中调用cgi文件没有帮助,创建.pm文件的包装并调用cgi文件