Changeset 28923 for trunk/tools/czartool/Czarplot.pm
- Timestamp:
- Aug 16, 2010, 2:02:58 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/tools/czartool/Czarplot.pm (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/czartool/Czarplot.pm
r28870 r28923 154 154 my ($self, $minY, $maxY) = @_; 155 155 156 my $tmp; 157 if (${$maxY} < ${$minY}) { 158 159 $tmp = ${$maxY}; 160 ${$maxY} = ${$minY}; 161 ${$minY} = $tmp; 162 } 163 156 164 my $border = (${$maxY} - ${$minY})/10; 157 165 … … 234 242 "set xdata time;" . 235 243 "set timefmt \"$self->{_dateFormat}\";" . 244 # "set yrange [\"$minY\":\"$maxY\"];" . 236 245 "set xrange [\"$minX\":\"$maxX\"];" . 237 246 "set format x \"$timeFormat\";" . … … 307 316 "'$gnuplotFile' using 1:2 title \"Available\" with lines lt 2\n"; 308 317 309 print GP "\n";318 print GP "\n"; 310 319 close GP; 311 320 } … … 349 358 350 359 my $prefix = $self->{_outputPath} ? $self->{_outputPath} : "."; # TODO should be function for this 351 my $outputFile = "$prefix/czarplot_hosts_space.png";360 my $outputFile = "$prefix/czarplot_hosts_space.png"; 352 361 my $limit = 97.0; 353 362 my $inputFile = $self->{_czarDb}->createHostsData($limit); … … 355 364 my $totalUsed = $self->{_czarDb}->getTotalClusterStorageAsPercentage(); 356 365 357 my $totalPercent = sprintf("%.1f%%", $totalUsed);366 my $totalPercent = sprintf("%.1f%%", $totalUsed); 358 367 359 368 open (GP, "|/usr/bin/gnuplot -persist") or die "no gnuplot";
Note:
See TracChangeset
for help on using the changeset viewer.
