Index: trunk/tools/shuffle_otas.pl
===================================================================
--- trunk/tools/shuffle_otas.pl	(revision 29378)
+++ trunk/tools/shuffle_otas.pl	(revision 29381)
@@ -111,5 +111,7 @@
 }
 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,5 +127,5 @@
 	    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";