X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fdbshow.pl;h=309ce8a51d61cb16d3edcee339097dacc30ffcc1;hb=2538c30a81811749c0cdaf55b8c9f65ee7c5167d;hp=8d393b98985f2e783245816fa61b88371bf937da;hpb=3ce9a942c76920cb3cf556b2c8a556ef0cc448c7;p=spider.git diff --git a/cmd/dbshow.pl b/cmd/dbshow.pl index 8d393b98..309ce8a5 100644 --- a/cmd/dbshow.pl +++ b/cmd/dbshow.pl @@ -40,12 +40,13 @@ foreach $n (@db) { # local databases can chain to remote ones my $count; - push @out, $db->print('pre'); + my $pre = $db->print('pre'); + push @out, $pre if defined $pre; # push @out, "@f"; for (@f) { -# push @out, $db->name . " $_"; + push @out, $db->name . " $_"; my $value = $db->getkey($_) || ""; - push @out, $db->name . ": $_ :"; +# push @out, $db->name . ": $_ :"; if ($value) { push @out, split /\n/, $value; $count++; @@ -54,7 +55,8 @@ foreach $n (@db) { } } if ($count) { - push @out, $db->print('post'); + my $post = $db->print('post'); + push @out, $post if $post; # last; } }