Select Code to Download

  use v6;

...
  }

  $output.close;

  my regex fields { \" <( .*? )> \" | <-[,"]>* }

...
    ==> map({@<fields>.join(chr 31) ~ chr 30 if /<fields>* % ','/})
    ==> spurt('output.tff');