use strict;
print "Content-type: text/html\n\n";

my $program="index.bat";
#$status=
system $program or die "$program exited funny: $?";