0

我有以下代码

#file 1 a.pm
package a;
@Export=(test);

print "test"; #hashing this is enabling the rendering 

sub test {
  return 1;
} 

#file 2 main cgi script test.pl
use a;
my $t = test();
print "Content-type: text/html\n\n";
print "<html>\n<body>\n<p>test= $t</p></body>\n</html>";

虽然在模块 a 中散列打印行正在启用渲染，但是当启用打印语句时，它无法做到吗？

4

1 回答 1

1

当您use使用a模块时，将print "test"执行。即在标题test之前打印。Content-type此外，您的Content-type标题变成testContent-type.

于 2012-09-14T21:01:23.427 回答