--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 0c6c38755240d8afdefb30fc35384c0577ee564a..76786505248a309684b2d78705bbe90b9ae46150 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -53,11 +53,11 @@ sub Triple::main {
     my $request = FCGI::Request();
 
     my @threads = (
-        (
+        \(
          [ "Post", 1 ],
          [ "Sneed", 2 ],
         ),
-        (
+        \(
          [ "based", 3 ],
          [ "retard", 4 ],
         ),