I am suspecting about $\="\n" in the beginning. But this is required as the other part of my program needs this.

To prevent this problelm, perl special variables (such as $\) should be declared with local in the smallest possible block where they are needed. Refer perldoc -f local