[LON-CAPA-cvs] cvs: loncom /cgi lonversions.pl

www lon-capa-cvs@mail.lon-capa.org
Mon, 18 Feb 2002 20:44:59 -0000


www		Mon Feb 18 15:44:59 2002 EDT

  Added files:                 
    /loncom/cgi	lonversions.pl 
  Log:
  Version query
  
  

Index: loncom/cgi/lonversions.pl
+++ loncom/cgi/lonversions.pl
#!/usr/bin/perl
$|=1;
# The LearningOnline Network with CAPA
# Versions
# (Running loncron
# 09/06/01 Gerd Kortemeyer)
# 02/18/02 Gerd Kortemeyer
#
print "Content-type: text/html\n\n".
      "<html><body bgcolor=#FFFFFF><h1>Handler Versions</h1>".
      "Please be patient<p><pre>\n";
open (DFH,
"grep '\$Id' /home/httpd/perl/* /home/httpd/lib/perl/Apache/*.pm /home/httpd/html/res/adm/includes/* /home/httpd/html/res/adm/pages/*|");
while ($line=<DFH>) { 
   print "$line"; 
}
close(DFH);
print "</pre></body></html>";