williamr/buglist_to_mediawiki.pl
changeset 245 478794dc0351
parent 244 2251fde91223
--- a/williamr/buglist_to_mediawiki.pl	Thu May 13 16:27:37 2010 +0100
+++ b/williamr/buglist_to_mediawiki.pl	Thu May 13 16:39:28 2010 +0100
@@ -12,16 +12,28 @@
 # Contributors:
 #
 # Description:
-# Convert tab-separated buglist into Mediawiki table
+# Convert comma-separated buglist into Mediawiki table
+#
+# Usage
+# buglist_to_mediawiki bugreport.csv [--pdk=PDK_3.0.0] > bugs.mediawiki.txt
 
 use strict;
 
 use FindBin;
 use lib "$FindBin::Bin\\..\\lib";
 use Text::CSV;
+use Getopt::Long;
+
+my $PDK="PDK_???";
+
+GetOptions((
+	'pdk=s' => \$PDK,
+));
 
 my $csv = Text::CSV->new();
 
+print "== Defects open at time of creation of $PDK ==\n\n";
+
 print "{|\n";   # start of table
 
 while (my $line = <>)