1 files changed, 12 insertions, 4 deletions
diff --git a/lib/Bookmarks/Utils.pm b/lib/Bookmarks/Utils.pm
index fd0b68d..a876340 100644
--- a/lib/Bookmarks/Utils.pm
+++ b/lib/Bookmarks/Utils.pm
@@ -1,15 +1,17 @@
 package Bookmarks::Utils;
 use strict;
 use warnings;
-use LWP::Simple;
+use LWP::UserAgent;
 use URI::URL;
 
+my $ua=LWP::UserAgent->new();
+
 sub check_link {
     my ($url)=@_;
     return 1 if $url!~/^http:/;
     #my ($type,$length,$update,$expires,$server)=head($url);
     #return defined $type;
-    return scalar head($url);
+    return $ua->head($url)->is_success();
 }
 
 sub get_site_icon {
@@ -38,8 +40,14 @@ sub get_site_icon {
     print "Trovato: '$favicon'";
     $favicon=URI::URL->new($favicon,$url)->abs->canonical->as_string;
     print ", ovvero '$favicon'\n";
-    my $icon=get($favicon);
-    return $icon;
+    my $res=$ua->get($favicon);
+
+    if ($res->is_success()) {
+        return ($res->decoded_content(),$res->header('Content-type'));
+    }
+    else {
+        return;
+    }
 }
 
 1;