--- a/materials/csv2transtab.pl	Thu Apr 16 14:26:49 2009 +0000
+++ b/materials/csv2transtab.pl	Thu Apr 16 14:27:07 2009 +0000
@@ -2,7 +2,6 @@
 #use strict;
 
 my %data = ();
-
 while (<STDIN>) {
   chomp;
   if (/^([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z ]+);([a-z -]+);([a-z ]+);([a-zA-Z ]+);(Yes|No);([A-Z][a-z]+);([a-z, ]+);([a-z, ]+)$/) {
@@ -15,7 +14,7 @@
       }
     }
   } else {
-    print "# $_\n";
+    print STDERR "# $_\n";
   }
 }