--- projects/cms/source/reports/rrdgraphing/watch.pl 2005/06/15 10:41:25 1.10 +++ projects/cms/source/reports/rrdgraphing/watch.pl 2006/11/23 16:37:44 1.13 @@ -28,10 +28,10 @@ # the i-scream server and collecting data. # # $Author: tdb $ -# $Id: watch.pl,v 1.10 2005/06/15 10:41:25 tdb Exp $ +# $Id: watch.pl,v 1.13 2006/11/23 16:37:44 tdb Exp $ #------------------------------------------------------------ -my($version) = '$Id: watch.pl,v 1.10 2005/06/15 10:41:25 tdb Exp $'; +my($version) = '$Id: watch.pl,v 1.13 2006/11/23 16:37:44 tdb Exp $'; $| = 1; @@ -44,10 +44,10 @@ use RRDs; # define variables that will be read from the config # nb. keep this insync with the config file! use vars qw{ - $imgdir $rrddir + $imgdir $imgwidth $imgheight $rrddir $maxrrdage $maximgage $deleterrds $deleteimgs $hex_slash $hex_underscore $hex_space $hex_colon $hex_bslash $hex_rbracket - $hex_lbracket $hex_plus + $hex_lbracket $hex_plus $hex_hash $rrdstep $retry_wait $verbose $quiet }; @@ -344,9 +344,10 @@ sub processdata() { $name =~ s/\\/$hex_bslash/g; $name =~ s/ /$hex_space/g; $name =~ s/:/$hex_colon/g; - $name =~ s/\(/$hex_rbracket/g; - $name =~ s/\)/$hex_lbracket/g; + $name =~ s/\(/$hex_lbracket/g; + $name =~ s/\)/$hex_rbracket/g; $name =~ s/\+/$hex_plus/g; + $name =~ s/#/$hex_hash/g; @data = ( "packet.net.p$i.attributes.rx:rx:GAUGE", "packet.net.p$i.attributes.tx:tx:GAUGE", );