Re: search contents of one file and replace with contents of another to make a new file

[marinersk]

Seeing open FHwithout matching close FHbothers me. The behavior might be correct -- heck, for all I know, Perl might even by design do the right thing -- but it jangles my OCD nerve.

    open (FH, $f1) || die;  # open file 1 in a file handle
    chomp(@strings = <FH>); # take off the line breaks
--> close FH;

    open (FH, $f2) || die; # open file 2 in a file handle
    $text = join '', <FH>; # joins files 1 and 2? - I don't think I wa
+nt to do this...
--> close FH;

[Marshall]

Yes, a close is the best way.
However in this situation, a new OPEN for that same filehandle will cause a "close" before the next OPEN happens.
So basically this "works".

[marinersk]

I love Perl.