put code tags please, and show some effort asking a question: 'urgent' and 'as soon as possible' are not the right words when asking for help. Anyway you are appending newlines to your variables and Perl print them. Always use stricts and warnings in your code, and you miss some quotes too.
L*
There are no rules, there are no thumbs..
Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.