I am creating a CGI script to display data dynamically in XML format on Internet Explorer, following is my code:-

use strict;
use CGI ':standard';
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
use XML::Simple();
use XML::Writer;

print "Content-type: text/xml\n\n";
print "<?xml version=\"1.0\"?>\n";

my $writer = new XML::Writer();
$writer->xmlDecl();
$writer->startTag('html');
$writer->startTag('body');

foreach my $ver (keys (&#37;data_hash)) {
$writer->startTag($ver);
$writer->characters($data_hash{$ver});
$writer->endTag($ver);
}
$writer->endTag('html');
$writer->endTag('body');

but I am getting following error message:-

malformed header from script. Bad header=<?xml version="1.0" encoding=":

Can anyone help me in resolving this issue.