diff --git a/git-svn.perl b/git-svn.perl
index 9808597..fd7232c 100755
--- a/git-svn.perl
+++ b/git-svn.perl
@@ -4005,7 +4005,7 @@
 sub url_path {
 	my ($self, $path) = @_;
 	if ($self->{url} =~ m#^https?://#) {
-		$path =~ s/([^~a-zA-Z0-9_.-])/uc sprintf("%%%02x",ord($1))/eg;
+		$path =~ s!([^~a-zA-Z0-9_./-])!uc sprintf("%%%02x",ord($1))!eg;
 	}
 	$self->{url} . '/' . $self->repo_path($path);
 }