From e0e75c82bfe708bc36774dbc12e63d6eec4b7b9e Mon Sep 17 00:00:00 2001
From: Emil Williams <emilemilemil@cock.li>
Date: Wed, 14 May 2025 14:08:14 -0600
Subject: [PATCH] --

---
 perl/Triple.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/perl/Triple.pm b/perl/Triple.pm
index d1ac0b2..34e4993 100644
--- a/perl/Triple.pm
+++ b/perl/Triple.pm
@@ -65,7 +65,8 @@ sub Triple::main {
             }
 
             open(my $fh, '>>', 'post_dump.txt') or die;
-            print $fh chomp($body) . '\n';
+            chomp $body;
+            print $fh $body . '\n';
             close $fh;
 
             $status   = '302 Found';
-- 
2.39.5