- $url =~ s([^-a-zA-Z0-9_./:])(sprintf('%%%02X', ord($&)))ge;
- $path =~ s([^-a-zA-Z0-9_./:])(sprintf('%%%02X', ord($&)))ge;
- $fn =~ s([^-a-zA-Z0-9_./:])(sprintf('%%%02X', ord($&)))ge;
+ $url =~ s($url_escape_re)(sprintf('%%%02X', ord($&)))ge;
+ $path =~ s($url_escape_re)(sprintf('%%%02X', ord($&)))ge;
+ $fn =~ s($url_escape_re)(sprintf('%%%02X', ord($&)))ge;