This website requires Javascript to function properly. Please go to the setting of your web browser and enable Javascript for this website.

Ad by

最优利率和cashback可以申请特批，好信用好收入offer更好。请点链接扫码加微信咨询，Scotiabank -- Nick Zhang 6478812600。

Ad by

最优利率和cashback可以申请特批，好信用好收入offer更好。请点链接扫码加微信咨询，Scotiabank -- Nick Zhang 6478812600。

你需要给出HTML的Header

hunterz(Hunter)

每个HTML都需要一个HTML Header, 如果是HTML文本文件, Webserver会自动加一个, 如果是CGI程序, 你需要自己加. 不过大家一般用CGI.pm.

试一下这个：
test.htm:
<HTML>
<HEAD><TITLE>Test Perl Program</TITLE></HEAD>
<BODY>
<H2>This is a Perl test program.</H2>
<a href="http://superman/cgi-bin/test.pl">Test App </a>
</BODY>
</HTML>

test.pl:

print "Content-Type: text/html\n\n",
"<HTML><HEAD>",
"<TITLE>Perl Program: test.pl</TITLE>",
"</HEAD>",
"Welcome!",
"</BODY>",
"</HTML>";

如果用CGI.pm:
test.pl:

use strict;
use CGI;
my $cgi = CGI->new;
print $cgi->header(),
$cgi->start_html(-title=>"Perl CGI Program: Test.pl"),
$cgi->b("Welcome!"),
$cgi->end_html();

参照一下ActivePerl的CGI的手册。

第一次回答问题，献丑了！

Hunter

http://www.perl.com

(#938029@0)
Last Updated: 2002-12-26
This post has been archived. It cannot be replied.

Report

Replies, comments and Discussions:

工作学习 / IT技术讨论 / 运行一个很简单的Perl程序却出错，何故? -victory(Victory); 2002-12-23 {720} (#931462@0)
test.htm
<a href="http://superman/cgi-bin/test.pl">Test App </a>

test.pl
print "Welcome!";

先运行test.htm, 再点击Test App ，出现以下提示：
CGI Error The specified CGI application misbehaved by not returning a complete set of HTTP headers. The headers it did return are:

Welcome!

我在DOS Command 窗口里运行perl test.pl, 出现正确文字，没有任何错误提示。

运行环境 Win 2000 server + IE 6.0 + ActivePerl 5.6(均为英文版)
我已经在WIN 2000 注册表的HKEY_LOCAL_MACHINE\System\Currentcontrlset \Services\W3svc\Parameters\ScriptMap\目录里，
在右边栏中增加以下的键值：分别加入键名“.cgi”、“.pl”,键值均为“e:\perl\bin\perl.exe %s %s”
对cgi-bin目录也给于读写执行等权限.

请指点，谢谢。

You need to stick a header at the very beginning and a blank line seperating it from the html body, like this: -dennis2(Dennis); 2002-12-23 {185} (#931593@0)
print <<END_of_Multiline_Text;
Content-type: text/html

<HTML>
<HEAD>
<TITLE>Welcome!</TITLE>
</HEAD>
<BODY>
<H1>Welcome!</H1>
</BODY>
</HTML>

END_of_Multiline_Text
干吗用window 跑perl啊？ hehe, anyway, 输出第一行一定要：是 print "content-type: text/html\n\n"; -tztz(tztz); 2002-12-23 (#932011@0)
你需要给出HTML的Header -hunterz(Hunter); 2002-12-26 {856} (#938029@0)
每个HTML都需要一个HTML Header, 如果是HTML文本文件, Webserver会自动加一个, 如果是CGI程序, 你需要自己加. 不过大家一般用CGI.pm.

试一下这个：
test.htm:
<HTML>
<HEAD><TITLE>Test Perl Program</TITLE></HEAD>
<BODY>
<H2>This is a Perl test program.</H2>
<a href="http://superman/cgi-bin/test.pl">Test App </a>
</BODY>
</HTML>

test.pl:

print "Content-Type: text/html\n\n",
"<HTML><HEAD>",
"<TITLE>Perl Program: test.pl</TITLE>",
"</HEAD>",
"Welcome!",
"</BODY>",
"</HTML>";

如果用CGI.pm:
test.pl:

use strict;
use CGI;
my $cgi = CGI->new;
print $cgi->header(),
$cgi->start_html(-title=>"Perl CGI Program: Test.pl"),
$cgi->b("Welcome!"),
$cgi->end_html();

参照一下ActivePerl的CGI的手册。

第一次回答问题，献丑了！

Hunter
http://www.perl.com

@Florida

你需要给出HTML的Header

Replies, comments and Discussions:

More Topics