2006-11-21

Perl: A stub CGI program giving XML response (Win32)

#!d:/Perl/bin/Perl.exe

#^ActiveState ActivePerl

print "Content-type: text/xml; charset=utf-8\n";
print "Status: 200 OK\n";
print "\n";

print "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n";
print "<i am=\"the\">walrus</i>";