#!/usr/local/bin/perl -w
use strict;
use CGI qw(:standard);
use CGI::Carp qw/fatalsToBrowser/;
print "Content-Type:text/html\n";
print "\n";
print "\n";
print "";
print "";
my $program="index.bat";
#$status=
system ($program) ==0 or die "$program exited funny: $?";
print "";
print "";
####
Content-type: text/html
Software error:
index.bat exited funny: 256 at E:\Perlcgi\pipeline\runindex.pl line 14.
####
todayindex.pl
agentview2.pl
serviceview1.pl
salesview1.pl
maview1.pl
hoview1.pl
caview1.pl
bmview1.pl
allindex.pl
beneview1.pl
charityview1.pl
facview1.pl
insuranceview1.pl
mortview1.pl
regulationview1.pl
salesadvview1.pl
savview1.pl
systemsview1.pl
trainview1.pl
previndex.pl