in reply to Weird Happening when i print into a file

Where is your 
open FOUT, ">filename" or die $!;

[download]
line?

In Section Seekers of Perl Wisdom