--

diff --git a/perl/Triple.pm b/perl/Triple.pm
index e83e796081bc0a06bbd36636726c7df94491258d..3d192481ca792fdb2224531fc901ba8a83deaa49 100644 (file)
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -129,7 +129,6 @@ sub Triple::main {
             -Content_Type => 'text/html',
             -charset      => 'UTF-8',
             -status       => $status,
-            -location     => $location,
             );
 
         next if $status ne '';