The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
PJCJ / Gedcom-1.17 / t / lines / lines 
proc main ()
{
  "te\"st1\n"
  'te\'st2'
  nl()
}