--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index 72507d49917aaa4b1f0bcade66c59e080576c645..23d65c15c11b20ee07b77ea72c064e4844ecc596 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -49,7 +49,7 @@ sub Triple::main {
             -charset      => 'UTF-8',
             );
 
-        my $page = %static{$vars->{uri}};
+        my $page = $static{$vars->{uri}};
         if (not $page) {
             my $dynamic = $page{$vars->{uri}};
             if ($dynamic) {