$ua = LWP::UserAgent->new(); $as = HTTP::Headers->new; $as->header('Accept' => 's'); $req = HTTP::Request->new('GET', "https://$server/production/file_bucket_file/md5/$md5", $as); $res = $ua->request($req); return $res->content;