--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 5b0219d8f1647a66d08c86ed3d1f9a1dca742d4e..66d15073250768d12a29adde69ab2195a36449cd 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -20,3 +20,5 @@ sub Triple::main() {
     my $debug = 1 if $sitename =~ /^test\./;
     openlog($sitename, "ndelay,pid", Sys::Syslog::LOG_DAEMON);
 }
+
+1;