Change location of peek print to comply with log

modules/Bio/EnsEMBL/Hive/Scripts/PeekJob.pm

@@ -35,7 +35,7 @@ sub peek {
     $job->load_parameters;
 
     my $unsub_params = $job->{'_unsubstituted_param_hash'};
-    print Data::Dumper->Dump( [ $unsub_params ], [ qw(*unsubstituted_param_hash) ] );
+    return Data::Dumper->Dump( [ $unsub_params ], [ qw(*unsubstituted_param_hash) ] );
 }
 
 1;

scripts/peekJob.pl

@@ -96,7 +96,7 @@ sub main {
         die "ERROR : no database connection, the pipeline could not be accessed\n\n";
     }
 
-    Bio::EnsEMBL::Hive::Scripts::PeekJob::peek($pipeline, $job_id);
+    print Bio::EnsEMBL::Hive::Scripts::PeekJob::peek($pipeline, $job_id);
 }