X-Git-Url: https://git.camperquake.de/gitweb.cgi?p=videosite.git;a=blobdiff_plain;f=videosite%2FBase.pm;h=6f686f5ee2b4e0612e6769b0696436d1bba32b3f;hp=437ef98839b0e5232e1cfbdf8fa16f952e2eb5b1;hb=20de709f626017479b48e4d2db1a80faf021901a;hpb=eeddf244ed2b5c9cde3bda1f264f6b0bd8155bb3

diff --git a/videosite/Base.pm b/videosite/Base.pm
index 437ef98..6f686f5 100644
--- a/videosite/Base.pm
+++ b/videosite/Base.pm
@@ -210,7 +210,10 @@ sub simple_get {
     my $ua = shift || $self->ua();
     my $r;
 
+    $self->debug("Getting %s", $url);
     $r = $ua->get($url);
+    $self->debug("Return code: %s", $r->status_line);
+    $self->debug("Content length: %d", length($r->decoded_content)) if $r->is_success();
     return $r->decoded_content() if $r->is_success();
     return undef;
 }