my $res = $ua->request($req) || die $!, $^E;