关于Perl 中的CGI的一个问题，需要各位的帮助

#! /usr/bin/perl -w

use CGI gw(:standard);
use strict;

print header;
print "Hello,world!";

为什么每次在浏览器中输入，总是提示：500 internet server error
我查看Appache的错误日志，发现提示的是： premature end of script heades

紧急求助，问下到底怎么办才可以正常哦？