if (is_error(getstore($geturl, $zipdestination))) {
                print "ERROR - Failed to write CSV to destination<br/>";
                next;
        }

        # extract a zip file
        print "Extracting $zipdestination...\n";
        my $zip = Archive::Zip->new();
        die 'Error reading zip file.' if $zip->read($zipdestination) != AZ_OK;
        my @members = $zip->members();
        foreach my $element (@members) {
                print "$element\n";
                $zip->extractMember($element);
        }
        print "Done!\n";