Changeset 40085 for trunk/ippMonitor
- Timestamp:
- Jul 11, 2017, 12:22:15 PM (9 years ago)
- File:
-
- 1 edited
-
trunk/ippMonitor/czartool/czartool/Pantasks.pm (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippMonitor/czartool/czartool/Pantasks.pm
r40055 r40085 71 71 72 72 if ( 73 $output =~ m/.*show\.labels.*/i ||74 73 $output =~ m/.*Connection reset by peer.*/i || 75 74 $output =~ m/.*server is busy.*/i ) { … … 120 119 my @labels; 121 120 122 print "stdscience : $ipphome/stdscience/ptolemy.rc\n";121 # print "stdscience : $ipphome/$server/ptolemy.rc\n"; 123 122 my @cmdOut = `echo "show.labels;quit" | pantasks_client -c $ipphome/$server/ptolemy.rc 2>&1`; 124 123 my $line; 125 124 my $passedHeader=0; 126 125 foreach $line (@cmdOut) { 127 print "labels: $line";126 # print "labels: $line"; 128 127 chomp($line); 129 128 if (!$self->outputOk($line)) {return \@labels;} … … 135 134 } 136 135 136 # one line has the show.labels command; skip it 137 if ($line =~ m/.*show\.labels.*/i) { next; } 138 137 139 if ($passedHeader && length($line) > 0){push(@labels, $line);} 138 140 }
Note:
See TracChangeset
for help on using the changeset viewer.
