Changeset 29381

Timestamp:

Oct 12, 2010, 2:33:57 PM (16 years ago)

Author:

watersc1

Message:

typo fix and counter addition

File:

• trunk/tools/shuffle_otas.pl (modified) (2 diffs)

trunk/tools/shuffle_otas.pl

@@ -111 +111 @@
 }
 my $dr_get_ext_ids = $db->selectall_arrayref( $sth_get_ext_ids );
+my $counter = 0;
 foreach my $row (@{ $dr_get_ext_ids }) {
+    $counter++;
     my ($current_vol_id,$current_ins_id,$so_id,$ext_id,$count,
         $max_ins_id,$check_vol_id) = @{ $row };
@@ -125 +127 @@
             if ($ok_cab_id != $forbidden_cab_id) {
                 if ($verbose) {
-                    print STDERR "Acceptible to move because ($max_ins_id,$current_ins_id,$current_vol_id,$forbidden_cab_id) != ($min_ins_id,$ok_vol_id,$ok_cab_id)\n";
+                    print STDERR "Acceptable to move because ($max_ins_id,$current_ins_id,$current_vol_id,$forbidden_cab_id) != ($min_ins_id,$ok_vol_id,$ok_cab_id) Count: $counter\n";
                 }
                 my $cmd = "$nebshift --volume $destination_name $ext_id $vol_name";