Thank You.
First off thank you for that little tip on word lists, very nice.
1. next unless length $deadstring; - I'm assuming this is to make sure that $deadstring is not an empty variable.
2. Worked perfectly when I tried it with the word list. However, once I tried using the actual file, it started reading the data wrong again. Is it possible that the coding of the file is causing the streamreader to interpert it wrong for perl?