summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
dc508f5)
git-svn-id: svn+ssh://svn.dolda2000.com/srv/svn/repos/src/utils@1123
959494ce-11ee-0310-bf91-
de5d638817bd
$res = $ua->request(HTTP::Request->new("GET", "$uri"));
if(open CACHE, ">:utf8", $cname) {
$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;
close CACHE;
}
return undef unless $res->is_success;
+ return $res->decoded_content;