remove extra output

diff --git a/bindings/perl-shared/t/callback.t b/bindings/perl-shared/t/callback.t
index 68b2adb8297d75ed6b280d4316d7bcdc3066d70f..fbc2961b1d692294ff37cd7eb2b9df9d62b5d074 100755 (executable)
--- a/bindings/perl-shared/t/callback.t
+++ b/bindings/perl-shared/t/callback.t
@@ -29,7 +29,6 @@ ok("loading",1);
 
 RRDs::fetch_cb_register(sub{
     my $request = shift;
-    print STDERR Dumper $request;
     my $items = ($request->{end}-$request->{start})/$request->{step};
     return {
       step=>200,
@@ -61,4 +60,3 @@ if (my $ERROR = RRDs::error) {
    die "RRD ERROR: $ERROR\n";
 }
 
-print Dumper $result;
\ No newline at end of file