and analyze the server response.

Yes and check the HTTP response of LWP::UserAgent

See HTTP::Response

if ($response->is_success) {
        print $response->content;
    }
[download]

Update : italic

hth,
PooLpi