@rem = '
@echo off
perl -S %0.bat %1 %2 %3 %4 %5 %6 %7 %8 %9
goto endofperl
';
#!c:\perl
$out = `%output_file%`;
print "out = $out\n\n";
open(OUT,">$out");
print "Content-type: text/html\n\n";
print "\n\n\nTesting from intro.prl\n\n";
print "\nThis is a test
\n\n\n\n";
__END__
:endofperl