标记，escapeHTML将转换为
我是CGI新手，我的代码输出:
Hello, "<h1>Tom Cat</h1>"!
似乎escapeHTML()不起作用。
#!C:/Perl/bin/perl.exe -w
use strict;
use CGI;
my $q = CGI->new();
print $q->header();
my $value = $q->param("myvar");
print $q->header();
print "<html><body>";
#print qq{Hello, "$value"!n};
print qq{Hello, "}, CGI::escapeHTML($value), qq{"!n};
print "</body></html>";
你想让它做什么?escapeHTML获取您的字符串并对其进行更改，以便将显示的内容是字符串中的内容-它将其转换为其他内容，然后浏览器将其转回原始测试。
你的参数"myvar"似乎包含了
标记，escapeHTML将转换为，以便浏览器可以恢复原始文本。
如果您希望它不这样做，而是解释标记，则需要而不是来转义它。