1 files changed, 2 insertions, 1 deletions
diff --git a/importxml.pl b/importxml.pl
index e33051e53..a11f116d9 100755
--- a/importxml.pl
+++ b/importxml.pl
@@ -51,7 +51,8 @@ use strict;
 # the rest of the file is compiled.
 BEGIN {
  $::path = $0;
- $::path =~ s#(.*)/[^/]+#$1#;
+ $::path =~ m#(.*)/[^/]+#;
+ $::path = $1;
 }
 chdir $::path;
 use lib ($::path);