From: Michael Gernoth Date: Tue, 9 Feb 2010 18:23:32 +0000 (+0100) Subject: intra page links for different hosts X-Git-Url: https://git.zerfleddert.de/cgi-bin/gitweb.cgi/upsgraph/commitdiff_plain/2c148a8ed56c09cb34ba4c44f5d6b84c06afb50c intra page links for different hosts --- diff --git a/upsgraph.pl b/upsgraph.pl index 2e40196..24d196a 100755 --- a/upsgraph.pl +++ b/upsgraph.pl @@ -241,10 +241,17 @@ exit 0 if ($child != 0); while(1) { open(HTML, ">${outdir}/index.html.new"); - print HTML 'USV status'; + print HTML 'Status'; print HTML ''; foreach my $host (@$hosts) { + print HTML "[{'name'}."\">".${host}->{'name'}."] "; + } + print HTML "
\n"; + + foreach my $host (@$hosts) { + print HTML "
\n"; + print HTML "{'name'}."\">\n"; my $vars = $host->{'vars'}; my $rrdfile = $host->{'rrdfile'}; my $hostname = $host->{'name'}; @@ -292,7 +299,7 @@ while(1) { rename("${outdir}/${hostname}.${var}.png.new", "${outdir}/${hostname}.${var}.png"); } - print HTML ""; + print HTML "
\n"; open (HTML2, ">${outdir}/${hostname}.${var}.html.new"); print HTML2 "" . $vars->{$var}->{'name'} . "";