--

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