How to parse out unwanted characters in a text file using Perl?

[john g]

I wrote a Perl script to log into my telnet server and send the output to a text file, but I am getting a ton of weird characters within each sentence of output that I want to parse\take out. All I want to do is read in the text file and remove the unwanted characters line by line to display the correct output.