We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 04b5694 commit cade8b9Copy full SHA for cade8b9
1 file changed
share/html/Elements/TSVExport
@@ -145,6 +145,8 @@ while (my $row = $Collection->Next) {
145
$val =~ s/(?:\n|\r)+/ /g; $val =~ s{\t}{ }g;
146
$val = $no_html->scrub($val);
147
$val = HTML::Entities::decode_entities($val);
148
+ # To prevent injection, add a leading space to make sure excel-ish applications treat it like a literal
149
+ $val =~ s/^(?=-|\+|=|\@|")/ /;
150
$val;
151
} @$col)."\n");
152
}
0 commit comments