print ref $gmail;

##</code><code>##

VUser::Google::ProvisioningAPI::V2_0

##</code><code>##

=pod

RetrievePageOfEmailLists($startList)

=over

Get a single page (100 lists) of email lists.

=cut

=cut

sub RetrievePageOfEmailLists {
    my $self = shift;

    my $start_emaillist;

    my $url = GOOGLEBASEURL.$self->{domain}."/emailList/$APIVersion";
    if ($start_emaillist) {
        $url .= "?startEmailListName=$start_emaillist";
    }
    my @entries = ();

    if ($self->Request('GET', $url)) {
        foreach my $entry (@{ $self->{result}{'entry'} }) {
            push @entries, $self->buildEmailListEntry($entry);
        }
    } else {
        return undef;
    }

    # Return list of EmailListEntries
    return @entries;
}