aboutsummaryrefslogtreecommitdiffhomepage
path: root/TOOLS/file2string.pl
diff options
context:
space:
mode:
Diffstat (limited to 'TOOLS/file2string.pl')
-rwxr-xr-xTOOLS/file2string.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/TOOLS/file2string.pl b/TOOLS/file2string.pl
index d9ad215d6d..341bb06fd6 100755
--- a/TOOLS/file2string.pl
+++ b/TOOLS/file2string.pl
@@ -9,8 +9,8 @@ use warnings;
# the exact contents of the original file.
# FIXME: why not a char array?
-# treat only alphanumeric and not-" punctuation as safe
-my $unsafe_chars = qr{[^][A-Za-z0-9!#%&'()*+,./:;<=>?^_{|}~ -]};
+# treat only alphanumeric and punctuations (excluding " and ?) as safe
+my $unsafe_chars = qr{[^][A-Za-z0-9!#%&'()*+,./:;<=>^_{|}~ -]};
for my $file (@ARGV) {
open my $fh, '<:raw', $file or next;