From: minima Date: Mon, 24 Feb 2003 16:04:59 +0000 (+0000) Subject: add \\ character X-Git-Tag: PRE-1-52~46 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=d31e215626887e26cf9dc1f1ece1f157f440fd15;p=spider.git add \\ character --- diff --git a/cmd/run.pl b/cmd/run.pl index 4a04c4cc..cfe2d8a2 100644 --- a/cmd/run.pl +++ b/cmd/run.pl @@ -19,7 +19,7 @@ while (@f) { push @out, $self->msg('e5'); next; } - $f =~ s|[^-\w/]||g; + $f =~ s|[^-\w/\\]||g; my $script = new Script(lc $f); unless ($script) { push @out, $self->msg('e3', 'script', $f);