print do
   {
       local $" = q{, };
       qq{@strings\n};
   };