--- projects/cms/source/reports/rrdgraphing/watch.pl 2005/02/10 17:35:58 1.9 +++ projects/cms/source/reports/rrdgraphing/watch.pl 2005/06/15 10:41:25 1.10 @@ -28,10 +28,10 @@ # the i-scream server and collecting data. # # $Author: tdb $ -# $Id: watch.pl,v 1.9 2005/02/10 17:35:58 tdb Exp $ +# $Id: watch.pl,v 1.10 2005/06/15 10:41:25 tdb Exp $ #------------------------------------------------------------ -my($version) = '$Id: watch.pl,v 1.9 2005/02/10 17:35:58 tdb Exp $'; +my($version) = '$Id: watch.pl,v 1.10 2005/06/15 10:41:25 tdb Exp $'; $| = 1; @@ -46,7 +46,8 @@ use RRDs; use vars qw{ $imgdir $rrddir $maxrrdage $maximgage $deleterrds $deleteimgs - $hex_slash $hex_underscore $hex_space $hex_colon $hex_bslash + $hex_slash $hex_underscore $hex_space $hex_colon $hex_bslash $hex_rbracket + $hex_lbracket $hex_plus $rrdstep $retry_wait $verbose $quiet }; @@ -343,6 +344,9 @@ 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_plus/g; @data = ( "packet.net.p$i.attributes.rx:rx:GAUGE", "packet.net.p$i.attributes.tx:tx:GAUGE", );