diff --git a/README.md b/README.md
index 242c2cfe7ce98c9f8b5256b92e0ae703a4362c8a..abe82a0651b2f8940da519dfd355bf6105a77981 100644
--- a/README.md
+++ b/README.md
@@ -15,6 +15,7 @@ Alternatively, copy the 'bin/' and 'lib' paths to your local perl installation.
     OPTIONS:
       -v --verbose    Show more detailed option
       -h --help       Prints this help information
+      --debug         Show user agent debug information
 
     COMMAND:
       init            Initialize config
diff --git a/bin/ta-tool.pl b/bin/ta-tool.pl
index 1d8f39d21d1cca7fe974994699ff760ad67da712..1d6a747c851ead22064535bfc3a984c419c728cb 100644
--- a/bin/ta-tool.pl
+++ b/bin/ta-tool.pl
@@ -22,6 +22,7 @@ SLUB::LZA::Rosetta::TA->run;
  OPTIONS:
     -v --verbose    Show more detailed option
     -h --help       Prints this help information
+    --debug         Show user agent debug information
 
 =head1 DESCRIPTION
 
diff --git a/lib/SLUB/LZA/Rosetta/TA/Command/count.pm b/lib/SLUB/LZA/Rosetta/TA/Command/count.pm
index 80cdcec65182a40b3aa82e0896c41c53b5dff4c9..ec943eafb1edcf822b84db1199353105f42a8141 100644
--- a/lib/SLUB/LZA/Rosetta/TA/Command/count.pm
+++ b/lib/SLUB/LZA/Rosetta/TA/Command/count.pm
@@ -38,6 +38,7 @@ sub description {
 sub opt_spec {
     return(
         ["verbose|v" => "enable verbose output"],
+        ["debug" => "enable user agent debug output"],
         ["datemode" => hidden => {one_of => [
             ["creationdate|c=s" => "search based on creationdate string"],
             ["modificationdate|m=s" => "search based on modificationdate string"]
@@ -73,7 +74,7 @@ sub execute {
     my $maxrecords="0";
     my $startrecord=1;
     my $query = SLUB::LZA::Rosetta::TA::common_sru::prepare_query($opt);
-    my $response = SLUB::LZA::Rosetta::TA::SRU::sru_search('ie', $query, $startrecord, $maxrecords, $opt->{verbose});
+    my $response = SLUB::LZA::Rosetta::TA::SRU::sru_search('ie', $query, $startrecord, $maxrecords, $opt->{verbose}, $opt->{debug});
     $response=~s|.*?<numberOfRecords>(\d+)</numberOfRecords.*|$1|s;
     say $response;
 }
diff --git a/lib/SLUB/LZA/Rosetta/TA/Command/search.pm b/lib/SLUB/LZA/Rosetta/TA/Command/search.pm
index 54cfdecb23992131a121b2dc5361c8219b2d8c6c..50c1439228d782587ac633b1ae5b83613309b8be 100644
--- a/lib/SLUB/LZA/Rosetta/TA/Command/search.pm
+++ b/lib/SLUB/LZA/Rosetta/TA/Command/search.pm
@@ -43,6 +43,7 @@ sub description {
 sub opt_spec {
     return(
         ["verbose|v" => "enable verbose output"],
+        ["debug" => "enable user agent debug output"],
         ["datemode" => hidden => {one_of => [
             ["creationdate|c=s" => "search based on creationdate string"],
             ["modificationdate|m=s" => "search based on modificationdate string"]
@@ -86,7 +87,7 @@ sub execute {
         $startrecord = $opt->{startrecord};
     }
     my $query = SLUB::LZA::Rosetta::TA::common_sru::prepare_query($opt);
-    my $response = SLUB::LZA::Rosetta::TA::SRU::sru_search('ie', $query, $startrecord, $maxrecords, $opt->{verbose}, $opt->{user}, $opt->{password});
+    my $response = SLUB::LZA::Rosetta::TA::SRU::sru_search('ie', $query, $startrecord, $maxrecords, $opt->{verbose}, $opt->{debug}, $opt->{user}, $opt->{password});
     say $response;
 }
 
diff --git a/lib/SLUB/LZA/Rosetta/TA/SRU.pm b/lib/SLUB/LZA/Rosetta/TA/SRU.pm
index d0cddf0b9bf325f210dcd06cd3402efb6dc68512..368dba1a7a85b9d2ad9e489f237f69bdea2fed08 100644
--- a/lib/SLUB/LZA/Rosetta/TA/SRU.pm
+++ b/lib/SLUB/LZA/Rosetta/TA/SRU.pm
@@ -28,6 +28,7 @@ sub sru_search {
     my $startrecord = shift;
     my $maxrecords = shift;
     my $is_verbose = shift;
+    my $is_debug = shift;
     my %searchpaths = (
         ie   => 'permanent/ie',
         file => 'permanent/file',
@@ -62,7 +63,7 @@ sub sru_search {
         say "searchurl = $sru";
     }
     foreach my $retry (1 .. 2) {
-        my $console_logger = debug_ua( $ua );
+        my $console_logger = debug_ua( $ua ) unless (! $is_debug);
         my $req = $ua->get($sru);
         if ($req->is_success) {
             my $xres = $req->decoded_content;
diff --git a/lib/SLUB/LZA/Rosetta/TA/common_sru.pm b/lib/SLUB/LZA/Rosetta/TA/common_sru.pm
index 65868bdf74760201d51183db08a0b27f679d347c..639c256127f09c97bcf74f3d5a7dcb4dc0329cf4 100644
--- a/lib/SLUB/LZA/Rosetta/TA/common_sru.pm
+++ b/lib/SLUB/LZA/Rosetta/TA/common_sru.pm
@@ -1,6 +1,7 @@
 package SLUB::LZA::Rosetta::TA::common_sru;
 use strict;
 use warnings;
+use Data::Printer;
 
 # VERSION
 
@@ -50,7 +51,6 @@ sub prepare_query {
     #my $query = join(" and ", @queries);
     my $query = join("+", @queries);
     if (exists $opt->{debug}) {
-        require Data::Printer;
         p( $opt);
         p(@queries);
         p( $query);