--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 41be588dd26350f74fc1b42b8f8bc83b3cf715a8..c47c0d68d73acf33fcb88d6dd4799a7a650da645 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -45,7 +45,7 @@ sub Triple::main {
             -charset      => 'UTF-8',
             );
 
-        print %static{$path};
+        # print %static{$path};
     }
 }