2017-10-20: FG; Fixed first iteration in script.

Ceph/Script/queryCephDisks.pl

@@ -226,12 +226,14 @@ foreach my $aKey2 (sort {$a<=>$b} keys %finalHash) {
 }
 
 my $_count = 0;
+my $firstIter = 1;
 # Present the data in JSON format?
 my $outJson =  "{\n";
 $outJson .= "\t\"data\":[\n\n";
 foreach my $key (sort keys %finalHash) {
     # Print the data in JSON	
-    $outJson .= "\t,\n" if ($doJson && $_count);
+    $outJson .= "\t,\n" if ($doJson && not $firstIter);
+    $firstIter = 0;
     my $thisCount = scalar @{$finalHash{$key}};
     $_count += $thisCount;
     if ($doJson) {