sub test {
   local $\="NEWLINE" if 1;
   if (1) {
      local $\;
   }
   print "text:";
}