$string =~ s/\n\n/\n'||CHR(10)||'/g;