--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 3cdf2006789b5d7de58bae88f55b25b10a03355a..3a2779dadb110f29aed8817e4ad5c74064347c25 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -146,8 +146,8 @@ sub Triple::main {
             }
             print $page;
         }
-    } catch {
-        syslog("info", "Crashed");
+    } catch ($error) {
+        syslog("info", "Crashed: " . $error);
     }
 }