dump workload for d_*

diff --git a/lib/APKPM/Gearman.pm b/lib/APKPM/Gearman.pm
index 584e7f7..725da10 100644 (file)
--- a/lib/APKPM/Gearman.pm
+++ b/lib/APKPM/Gearman.pm
@@ -13,13 +13,13 @@ sub e_json {
 
 sub d_json {
        my ( $self, $workload ) = @_;
-       warn "# d_json ", dump $workload;
+       warn "# d_json $workload";
        return JSON::XS::decode_json($workload);
 }
 
 sub d_array {
        my ( $self, $result ) = @_;
-       warn "# d_array ", dump($result);
+       warn "# d_array $result";
        return [ split(/\s+/,$result) ];
 
 }