Parent Directory | Revision Log | Patch
revision 11 by dpavlin, Fri Jul 17 13:25:34 2009 UTC | revision 12 by dpavlin, Fri Jul 17 13:43:41 2009 UTC | |
---|---|---|
# | Line 99 my @t = sort keys %$vsz; | Line 99 my @t = sort keys %$vsz; |
99 | print "\ndrawing $#t intervals ", $t[0], " - ", $t[$#t]; | print "\ndrawing $#t intervals ", $t[0], " - ", $t[$#t]; |
100 | ||
101 | my $rrd = RRD::Simple->new( file => $rrd_file ); | my $rrd = RRD::Simple->new( file => $rrd_file ); |
102 | $rrd->create( 'hour', map { ( $_ => 'GAUGE' ) } @veids ); | $rrd->create( map { ( $_ => 'GAUGE' ) } @veids ); |
103 | ||
104 | foreach my $t ( @t ) { | foreach my $t ( @t ) { |
105 | print STDERR "."; | print STDERR "."; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |