X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Fvar.pl;h=5352baf3d152f0b765e8647a2f4ffc4c3d4448dc;hb=ae313f260d904cd45b58e4d1e620a49aef1a42c9;hp=b8d81d264fae7fa9bc3146d95c3de7f95d9c9b3a;hpb=8b5b39174f15921598327418562a96219d6abfd5;p=spider.git diff --git a/cmd/set/var.pl b/cmd/set/var.pl index b8d81d26..5352baf3 100644 --- a/cmd/set/var.pl +++ b/cmd/set/var.pl @@ -14,9 +14,9 @@ return (1, $self->msg('e9')) unless $line; my ($var, $rest) = split /=|\s+/, $line, 2; $rest =~ s/^=\s*//; -Log('DXCommand', $self->call . " set $var = $rest" ); +Log('DXCommand', $self->call . " set $var = " . dd($rest) ); eval "$var = $rest"; -return (1, $@ ? $@ : "Ok, $var = $rest" ); +return (1, $@ ? $@ : "Ok, $var = " . dd($rest) );