1 |
|
#!/usr/bin/perl -w |
2 |
|
# i-scream central monitoring system |
3 |
|
# http://www.i-scream.org |
4 |
< |
# Copyright (C) 2000-2003 i-scream |
4 |
> |
# Copyright (C) 2000-2004 i-scream |
5 |
|
# |
6 |
|
# This program is free software; you can redistribute it and/or |
7 |
|
# modify it under the terms of the GNU General Public License |
16 |
|
# You should have received a copy of the GNU General Public License |
17 |
|
# along with this program; if not, write to the Free Software |
18 |
|
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
19 |
+ |
# |
20 |
+ |
# $Id$ |
21 |
|
|
22 |
|
use strict; |
23 |
|
use Getopt::Long; |
69 |
|
foreach my $title (sort keys %pages) { |
70 |
|
my $page = $pages{$title}; |
71 |
|
print "<h2><a href=\"$page.html\">$title</a></h2>\n"; |
72 |
< |
print "<p><img src=\"$page-day.png\" alt=\"$page\"/></p>\n"; |
72 |
> |
print "<p><img src=\"$page-day.png\" alt=\"$page\" /></p>\n"; |
73 |
|
} |
74 |
|
print <<EOF; |
75 |
|
<p>Generated by <a href="http://www.i-scream.org/libstatgrab"> |