You have helped me pinpoint the problem my other problem is when I am reading in content and then try to print. I think im replicating the problem correctly. You helped clear up when i print to output directly rather than off of reading in a file or content from a webpage the problem is solved if i do \r\n when printing the output
#!perl
use File::Slurp;
use strict;
use warnings;
my $textfile = 'inputfile.txt';
my $output_file = 'file.txt';
my $text = read_file($textfile);
open(my $output_fh, '>',"$output_file")
or die "Failed to open $output_file: $!";
print {$output_fh} $text, "\r\n";
close $output_fh;
| 