check response

heiseonline · Dec 2, 2014 · ec3cd4e · ec3cd4e
1 parent df79a81
commit ec3cd4e
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/lib/Heise/Shariff/Service/Facebook.pm b/lib/Heise/Shariff/Service/Facebook.pm
@@ -1,6 +1,7 @@
 package Heise::Shariff::Service::Facebook;
 
 use Mojo::Base 'Heise::Shariff::Service';
+use Mojo::Util qw(dumper);
 
 sub request {
     my ($self, $url) = @_;
@@ -15,7 +16,13 @@ sub request {
 
 sub extract_count {
     my ($self, $res) = @_;
-    return $res->json->[0]->{share_count};
+
+    if (ref $res->json eq 'ARRAY') {
+        return $res->json->[0]->{share_count};
+    } else {
+        warn dumper($res);
+        return 0;
+    }
 }
 
 sub get_name {