version 1.1, 2001/04/03 13:23:06
|
version 1.3, 2001/04/03 13:27:41
|
Line 43 while(<IN>) {
|
Line 43 while(<IN>) {
|
close IN; |
close IN; |
|
|
my $date=`date`; chop $date; |
my $date=`date`; chop $date; |
my $hostname=hostname; |
my $hostname=`hostname`; chop $hostname; |
print <<END; |
print <<END; |
<HTML> |
<HTML> |
<HEAD> |
<HEAD> |
Line 53 print <<END;
|
Line 53 print <<END;
|
<FONT SIZE=+2>LON-CAPA Software RPM Status Page (done on $date for $hostname)</FONT> |
<FONT SIZE=+2>LON-CAPA Software RPM Status Page (done on $date for $hostname)</FONT> |
<BR>Michigan State University |
<BR>Michigan State University |
<BR>Learning Online with CAPA |
<BR>Learning Online with CAPA |
<BR>Contact korte@lon-capa.org |
<BR>Contact korte\@lon-capa.org |
<UL> |
<UL> |
<LI>About this file</LI> |
<LI>About this file</LI> |
<LI>Bad RPM Versions</LI> |
<LI>Bad RPM Versions</LI> |