Subject: | Missing escaping backslashes |
Regexp used when reading keys and values from a file doesn't scape % and $ characters. It's a problem when reading pairs like
"%%Value%%"=hex(0):
Fix is attached.
--- File.pm 2005-06-05 12:38:19.811712128 +0200
+++ File.pm.new 2005-06-05 12:39:00.138581512 +0200
@@ -318,7 +318,7 @@
# Only non-control-character low-ASCII characters are disallowed in
# the key part in our implementation.
($key, $value) = (
- m/^([\w !"#$%&'()*+,-.\/:;<>?@\[\]^`{|}~\\]{1,1024})=(.*)$/);
+ m/^([\w !"#\$\%&'()*+,-.\/:;<>?@\[\]^`{|}~\\]{1,1024})=(.*)$/);
last if (!defined $key);