From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more
1234567891011 #!perl.exeBEGIN{ use strict; use warnings;};local $| = 0;print "Content-type: text/html\n";print "MyCGI: Test 5\n\n";print "5; path_info: $ENV{PATH_INFO}; query_string: $ENV{QUERY_STRING};";
#!perl.exe
BEGIN
{
use strict;
use warnings;
};
local $| = 0;
print "Content-type: text/html\n";
print "MyCGI: Test 5\n\n";
print "5; path_info: $ENV{PATH_INFO}; query_string: $ENV{QUERY_STRING};";