#!/usr/bin/perl
$|=1;
# The LearningOnline Network with CAPA
# Running loncron
# 09/06/01 Gerd Kortemeyer
print "Content-type: text/html\n\n".
"Running loncron ...
".
"Please be patient\n";
open (DFH,"/home/httpd/perl/loncron|");
while ($line=) {
print "$line";
}
close(DFH);
print "
Status Report";
print "
LONC report";
print "
LOND report";