Select Code to Download

my $ua = LWP::UserAgent->new();
my $request = HTTP::Request->new('PUT', $url, undef, $content");
my $response = $ua->request($request, \&check_response);