Hello Monks, I am trying to replace text in a file and write it to a copy of that file but i get an error where the only some of the text gets replaced and the rest is just added on to the beginning of the file(I don't want it there). Please let me know if you have any questions, and Thank You!

the data that needs to be replaced is just a bunch of paths to certain
+ directories and it looks kinda like this

#data to replace
old/path/to/some/file
another/old/path/to/some/file
one/more/old/path/to/some/file

#desired replacement
new/path/to/some/file
another/new/path/to/some/file
one/more/new/path/to/some/file
[download]

        #Code to read in file
        my $inputFile = 'file.txt';
    my $fileContent = do {
        open(my $fileHandle, $inputFile ) or die "Could not open file 
+'$inputFile' $!";
    
        local $/;
        <$fileHandle>;
    };

        #replace search paths with data in hash per key, $oldSearchPat
+hs and %searchPaths are initialized elsewhere
    foreach my $key (keys %searchPaths){

        $fileContent =~ s/\Q$oldSearchPaths\E/\n$searchPaths{$key}/;
    }


        #code to write to file
        my $filename = 'fileCopy.txt';
    open(my $fh, '>', $filename) or die "Could not open file '$filenam
+e' $!";
    print $fh $fileContent;
    close $fh;
    print "Writing to File Done! \n";
[download]

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.