s/[\n\r\f]//g

##</code><code>##

perl -i.tmp -p yourscript.pl file.txt

##</code><code>##

open (F,"file.txt");
@ar = <F>;
close(F);
foreach (@ar) {
    s/[\n\r\f]//g;
    # do what you want with the line.
}