open F, '>', $file; binmode(F); print F $response->content; close F; print ''; print 'Your Report is finisched'; print '';