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