Count the number of bugs and print on the default ouptut to update the Release Notes with that value. Need to be added automatically.
authorArnaud Lenoir
Mon, 19 Oct 2009 18:06:51 +0100
changeset 101 24273662fe97
parent 99 5adea361d896
child 102 5407bb741e43
Count the number of bugs and print on the default ouptut to update the Release Notes with that value. Need to be added automatically.
bzcsv2mw/bzcsv2mw.pl
--- a/bzcsv2mw/bzcsv2mw.pl	Fri Nov 06 12:10:52 2009 +0000
+++ b/bzcsv2mw/bzcsv2mw.pl	Mon Oct 19 18:06:51 2009 +0100
@@ -40,6 +40,7 @@
 
 my $file = "";
 my $help = 0;
+my $count_nb_total_bugs=0;
 
 if (!GetOptions(
     "csv=s" => \$file,
@@ -88,7 +89,8 @@
 			foreach (@columns) 
 			{
 				print MWTXT "|$_\n";
-			}		
+			}
+			$count_nb_total_bugs++;
 		}
 	} 
 	else 
@@ -102,4 +104,5 @@
 
 close CSV;
 print MWTXT "|}\n";
-close MWTXT;
\ No newline at end of file
+close MWTXT;
+print "\nThe number of bugs is: $count_nb_total_bugs\n";