-l simply sets $\ so all you need is

{
   local $\ = "\n";
   ...
}
[download]

Be warned that local is dynamically scoped, which means that it will also affect functions called from within the block.