in reply to Problems with print ID command

This works fine for me: 
#!/usr/local/bin/perl
print "Content-type:text/html\n\n";
print <<END;
<html>
<body>
Bla bla bla
</body>
</html>
END

[download]

Hope that helps,
-ase

In Section Seekers of Perl Wisdom