Changeset 40459
- Timestamp:
- Jun 27, 2018, 1:10:35 PM (8 years ago)
- File:
-
- 1 edited
-
trunk/tools/regpeek.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/regpeek.pl
r34018 r40459 21 21 } 22 22 print "Date: $date\n"; 23 print "CMD: regtool -checkstatus -date $date -class_id ota33 -dbname gpc1-simple\n";24 chomp(my $bad_exp = `regtool -checkstatus -date $date -class_id ota33 -dbname gpc1-simple | grep 'stop run' | head -1`);23 print "CMD: regtool -checkstatus -date $date -class_id ota33 -dbname $dbname -simple\n"; 24 chomp(my $bad_exp = `regtool -checkstatus -date $date -class_id ota33 -dbname $dbname -simple | grep 'stop run' | head -1`); 25 25 my @row = split /\s+/, $bad_exp; 26 26 if ($#row == 18) { … … 49 49 print "$exp_name $class_id $bt_state $data_state $uri\t"; 50 50 if (($bt_state > -10)&&($data_state eq 'check_burntool')) { 51 print "#??? regtool -updateprocessedimfile -exp_id $exp_id -class_id $class_id -set_state pending_burntool -dbname gpc1";51 print "#??? regtool -updateprocessedimfile -exp_id $exp_id -class_id $class_id -set_state pending_burntool -dbname $dbname"; 52 52 } 53 53 print "\n";
Note:
See TracChangeset
for help on using the changeset viewer.
