X-Git-Url: http://dolda2000.com/gitweb/?a=blobdiff_plain;f=ANN.pm;h=8b311f4b84d69f3fec2e3b292b157a6f94d1d17a;hb=9959ad1a146f77fa310329802b567b9132fc15cc;hp=48bd9c494c6539071e19f4bb1aab2dc14ece7c21;hpb=553e41ef5bc95f5edcce12ccf15beae3d0fdaddc;p=utils.git

diff --git a/ANN.pm b/ANN.pm
index 48bd9c4..8b311f4 100644
--- a/ANN.pm
+++ b/ANN.pm
@@ -35,12 +35,12 @@ sub _get
     $res = $ua->request(HTTP::Request->new("GET", "$uri"));
     
     if(open CACHE, ">:utf8", $cname) {
-	print CACHE $res->content;
+	print CACHE $res->decoded_content;
 	close CACHE;
     }
     
     return undef unless $res->is_success;
-    return $res->content;
+    return $res->decoded_content;
 }
 
 sub getlist