From b7d5af4801231e051a5ea825cce2fc0c6f1750c9 Mon Sep 17 00:00:00 2001 From: Emil Williams Date: Wed, 14 May 2025 13:34:44 -0600 Subject: [PATCH] -- --- perl/Triple.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/perl/Triple.pm b/perl/Triple.pm index 8d4b86e..39bbbf5 100644 --- a/perl/Triple.pm +++ b/perl/Triple.pm @@ -54,6 +54,7 @@ sub Triple::main { my $content_length = $ENV{'CONTENT_LENGTH'} || 0; my $content_type = $ENV{'CONTENT_TYPE'} || ''; my $status = ''; + my $location; my $body = ''; if ($method eq 'POST') { -- 2.39.5