local ($,,$\)=("\n") x 2;

##</code><code>##

local ($\,$,)=("\n") x 2;

##</code><code>##

q{ ... };  # or
qq{ ... };