--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index c1bf2ffa716af3061e229991100492cace0579cf..8824ed992d5abdd316bfabfde91f5644c8b5fda4 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -41,7 +41,7 @@ sub Triple::main {
     my ($sitename, $version) = init();
     my $request = FCGI::Request();
 
-    my $vars = {
+    our $vars = {
         sitename => $sitename,
         version  => $version,
     };