[BACK]Return to lonversions.pl CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / cgi
File:  [LON-CAPA] / loncom / cgi / lonversions.pl
Revision 1.1: download - view: text, annotated - select for diffs
Mon Feb 18 20:44:58 2002 UTC (22 years, 4 months ago) by www
Branches: MAIN
CVS tags: HEAD
Version query

    1: #!/usr/bin/perl
    2: $|=1;
    3: # The LearningOnline Network with CAPA
    4: # Versions
    5: # (Running loncron
    6: # 09/06/01 Gerd Kortemeyer)
    7: # 02/18/02 Gerd Kortemeyer
    8: #
    9: print "Content-type: text/html\n\n".
   10:       "<html><body bgcolor=#FFFFFF><h1>Handler Versions</h1>".
   11:       "Please be patient<p><pre>\n";
   12: open (DFH,
   13: "grep '\$Id' /home/httpd/perl/* /home/httpd/lib/perl/Apache/*.pm /home/httpd/html/res/adm/includes/* /home/httpd/html/res/adm/pages/*|");
   14: while ($line=<DFH>) { 
   15:    print "$line"; 
   16: }
   17: close(DFH);
   18: print "</pre></body></html>";
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>