--- projects/cms/source/reports/rrdgraphing/graph.pl 2005/06/15 10:41:25 1.17 +++ projects/cms/source/reports/rrdgraphing/graph.pl 2005/06/15 15:39:24 1.18 @@ -27,7 +27,7 @@ # Generates graphs from rrd databases for i-scream data. # # $Author: tdb $ -# $Id: graph.pl,v 1.17 2005/06/15 10:41:25 tdb Exp $ +# $Id: graph.pl,v 1.18 2005/06/15 15:39:24 tdb Exp $ #------------------------------------------------------------ ## TODO @@ -35,7 +35,7 @@ # -- allow configurable periods of graphs # -- comments, types, etc -my($version) = '$Id: graph.pl,v 1.17 2005/06/15 10:41:25 tdb Exp $'; +my($version) = '$Id: graph.pl,v 1.18 2005/06/15 15:39:24 tdb Exp $'; $| = 1; @@ -284,8 +284,8 @@ foreach my $machine (@rrddirlist) { $nicename =~ s/$hex_bslash/\\/g; $nicename =~ s/$hex_space/ /g; $nicename =~ s/$hex_colon/:/g; - $nicename =~ s/$hex_rbracket/(/g; - $nicename =~ s/$hex_lbracket/)/g; + $nicename =~ s/$hex_lbracket/(/g; + $nicename =~ s/$hex_rbracket/)/g; $nicename =~ s/$hex_plus/+/g; &makegraph($machine, "$type-$name", "Network IO for $machine on $nicename", "bytes per second", \@data, \@rawdata); }