X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Frun.pl;h=a30c1972e13aedf77e1ac5f6740575b46000c407;hb=refs%2Fheads%2Fnewpc92timings;hp=4a04c4cc7aecdfb190f028b14dd4f0752933ef14;hpb=ec57aa982f870daf09a1fc7839d06e52980cfb55;p=spider.git diff --git a/cmd/run.pl b/cmd/run.pl index 4a04c4cc..a30c1972 100644 --- a/cmd/run.pl +++ b/cmd/run.pl @@ -5,7 +5,7 @@ # # Copyright (c) 1998 Dirk Koopman G1TLH # -# $Id$ +# # my ($self, $line) = @_; @@ -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);