be less noisy

show_fingerprints.pl

@@ -25,7 +25,7 @@ while (my $arg= shift (@ARGV))
   }
   elsif ($arg =~ m#^-(.+)#)
   {
-    print ">>> arg=[$arg] 1=[$1]\n";
+    # print ">>> arg=[$arg] 1=[$1]\n";
     my @opts= split ('', $1);
     foreach my $opt (@opts)
     {
@@ -33,7 +33,7 @@ while (my $arg= shift (@ARGV))
       {
         $has_E= 1;
         $hash_algorithm= shift (@ARGV);
-        print "NOTE: hash_algorithm=[$hash_algorithm]\n";
+        # print "NOTE: hash_algorithm=[$hash_algorithm]\n";
       }
     }
   }