# call NDFgenByDay to retrieve the xml forecast data
        print "\n\nCalling NDFgenByDay to retrieve XML forecast data for ", $location[$i], " ... ";
        my $response = $weather->call(
            SOAP::Data->name($method)
                =>SOAP::Data->type(decimal=>$latitude[$i])->name('latitude'),
                =>SOAP::Data->type(decimal=>$longitude[$i])->name('longitude'),
                =>SOAP::Data->type(date=>$startDate)->name('startDate'),
                =>SOAP::Data->type(integer=>$numDays)->name('numDays'),
                =>SOAP::Data->type(string=>$format)->name('format')
        );
        print "done.\n";

##</code><code>##

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

##</code><code>##

$weatherIconURL = $data->{'data'}->{'parameters'}->{'conditions-icon'}->{'icon-link'}->[0];