If that is your complete code, you are missing any output statements. You have edited the variable $line, which edits the string in memory... but then you do nothing with it. Given that you've chomped the line, I recommend something like print "$line\n"; at the end of your foreach loop