open F, ">$file" #or quit("Unable to open output file for writing: $!");
binmode(F);
print F $response->content;
close F;