/[cricket]/generate-overview.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /generate-overview.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.8 by dpavlin, Sun May 18 11:54:28 2003 UTC revision 1.9 by dpavlin, Fri May 23 07:41:26 2003 UTC
# Line 107  foreach my $key (keys %html_file) { Line 107  foreach my $key (keys %html_file) {
107          }          }
108          Info("Dumping HTML for $key to $filename.");          Info("Dumping HTML for $key to $filename.");
109          open(OUT,"> $filename") || die "can't open output html '$filename': $!";          open(OUT,"> $filename") || die "can't open output html '$filename': $!";
110          print OUT '<html><head><title>'.$key.'</title>          print OUT "<html><head><title>$key</title>";
111                  <meta content="no-cache" http-equiv="Pragma">          print OUT '<meta content="no-cache" http-equiv="Pragma">
112                  <meta content="300" http-equiv="Refresh">                  <meta content="300" http-equiv="Refresh">' if ($filename =~ m/Daily/i);
113                  </head><body>';          print OUT "</head><body>";
114          print OUT $html_file{$key};          print OUT $html_file{$key};
115          print OUT "</body></html>";          print OUT "</body></html>";
116          close(OUT);          close(OUT);

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

  ViewVC Help
Powered by ViewVC 1.1.26