File:
[LON-CAPA] /
loncom /
cgi /
lonversions.pl
Revision
1.2:
download - view:
text,
annotated -
select for diffs
Mon Feb 18 23:23:23 2002 UTC (22 years, 7 months ago) by
www
Branches:
MAIN
CVS tags:
version_1_0_3,
version_1_0_2,
version_1_0_1,
version_1_0_0,
version_0_99_5,
version_0_99_4,
version_0_99_3,
version_0_99_2,
version_0_99_1,
version_0_99_0,
version_0_6_2,
version_0_6,
version_0_5_1,
version_0_5,
version_0_4,
stable_2002_july,
stable_2002_april,
conference_2003,
STABLE,
HEAD
No need to be patient
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: "<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>