X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCommandmode.pm;h=9dd2b33c146fb6b22df90cfbfc31a54d8e159b2e;hb=de74820014fc2c49c789ebcbe683bccf23adbfe7;hp=6b62f58a820f02d1215f7b7decd1054300ad0ec0;hpb=be587fd8dade028c10545ffff4be13b0a18f3f91;p=spider.git diff --git a/perl/DXCommandmode.pm b/perl/DXCommandmode.pm index 6b62f58a..9dd2b33c 100644 --- a/perl/DXCommandmode.pm +++ b/perl/DXCommandmode.pm @@ -436,7 +436,7 @@ sub run_cmd # strip out // on command only $cmd =~ s|//|/|g; $cmd =~ s|^/||g; # no leading / either - $cmd =~ s|[^-\w/]||g; # and no funny characters either + $cmd =~ s|[^-?\w/]||g; # and no funny characters either my ($path, $fcmd);