#!G:\Perl\bin\perl.exe -w

use strict;

print "$ENV{SERVER_PROTOCOL} 200 OK\n";
print "Server: $ENV{SERVER_SOFTWARE}\n";
print "Content-type: text/plain\n\n";

print "test ok!"

##</code><code>##

#!G:\Perl\bin\perl.exe -w

use strict;

print "Content-type: text/plain\n\n";

print "test ok!"
print "$ENV{SERVER_PROTOCOL} 200 OK\n";
print "Server: $ENV{SERVER_SOFTWARE}\n";