xml - perl cgi 服务器响应一个 PL 文件而不是一个 xml 文件

Question

我将内容类型设置为 text/xml 并想要获取一个 xml 文件，但 cgi 程序的响应是一个 PL 文件，它会强制浏览器打开下载对话框。我下载文件并用文本编辑器打开它。在文件的开头它显示了 http 标头，我认为这很奇怪。这是文件的 URL：“http://23.23.123.93/watergrid/dma/j796/hydro” 谁能帮帮我？

if(defined($result)) {
#imitate nph- cgi for IIS
my $status = defined($ENV{'SERVER_SOFTWARE'}) && $ENV{'SERVER_SOFTWARE'}=~/IIS/ ? $ENV{SERVER_PROTOCOL} || 'HTTP/1.0' : 'Status:';
my $code = $result->code;
binmode(STDOUT);

print STDOUT "$status $code ", HTTP::Status::status_message($code),
"\015\012", $result->headers_as_string, "\015\012", $result->content;}

Answer 1

在标头输出之前，您有一个“o 检索网络数据”字符串。所以尝试在 perl 源中搜索这个字符串并将其删除。