Changeset 40088 for trunk/ippMonitor
- Timestamp:
- Jul 11, 2017, 12:26:41 PM (9 years ago)
- File:
-
- 1 edited
-
trunk/ippMonitor/czartool/czartool/Plotter.pm (modified) (11 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippMonitor/czartool/czartool/Plotter.pm
r40055 r40088 39 39 "deleted_local"); 40 40 41 my $GNUPLOT="/home/panstarrs/ipp/local/bin/gnuplot"; 41 # my $GNUPLOT="/home/panstarrs/ipp/local/bin/gnuplot"; 42 # my $GNUPLOT="/data/ippc64.1/ippitc/local/bin/gnuplot"; 42 43 43 44 ########################################################################### … … 142 143 } 143 144 145 $self->{GNUPLOT} = $self->{_config}->getGnuplotExec(); 144 146 145 147 $self->{_czarDb} = $self->{_config}->getCzarDbInstance(); … … 264 266 my ($self, $gnuplotFiles, $outputFile, $label, $selectedStage, $beginTime, $endTime, $interval) = @_; 265 267 266 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";268 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 267 269 use FileHandle; 268 270 GP->autoflush(1); … … 445 447 close(GNUDAT); 446 448 447 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";449 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 448 450 use FileHandle; 449 451 GP->autoflush(1); … … 577 579 $title .= " for '$label'\\nFrom '$fromTime' to '$toTime' HST"; 578 580 579 open (GP, "|$ GNUPLOT-persist > /dev/null 2>&1") or die "no gnuplot";581 open (GP, "|$self->{GNUPLOT} -persist > /dev/null 2>&1") or die "no gnuplot"; 580 582 use FileHandle; 581 583 GP->autoflush(1); … … 649 651 $self->getTimeSpacing($timeDiff, \$divX, \$timeFormat); 650 652 651 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";653 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 652 654 use FileHandle; 653 655 GP->autoflush(1); … … 693 695 my $totalPercent = sprintf("%.1f%%", $totalUsed); 694 696 695 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";697 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 696 698 use FileHandle; 697 699 GP->autoflush(1); … … 738 740 my $totalPercent = sprintf("%.1f%%", $totalUsed); 739 741 740 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";742 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 741 743 use FileHandle; 742 744 GP->autoflush(1); … … 802 804 803 805 804 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";806 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 805 807 use FileHandle; 806 808 GP->autoflush(1); … … 926 928 927 929 # make histogram 928 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";930 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 929 931 use FileHandle; 930 932 GP->autoflush(1); … … 949 951 950 952 # make cumulative distribution 951 open (GP, "|$ GNUPLOT-persist") or die "no gnuplot";953 open (GP, "|$self->{GNUPLOT} -persist") or die "no gnuplot"; 952 954 use FileHandle; 953 955 GP->autoflush(1);
Note:
See TracChangeset
for help on using the changeset viewer.
