--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index e2a6bc1dec31e233aaa6e7afa5d198bf3ef57b4a..ee101eb7e0e05bbb8ae463206f3211976c87d03c 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -41,13 +41,13 @@ sub Triple::main {
 
         my $path = $ENV{'REQUEST_URI'} // '/';
 
-        exit;
-
         print $cgi->header(
             -Content_Type => 'text/html',
             -charset      => 'UTF-8',
             );
 
+        exit;
+
         print %static{$path};
     }
 }