my $xml = $filePath . 'Forecast_' . $location[$i] . '.xml';
open(OUT, '>' . $xml);
print OUT $response->result;
close(OUT);