CPAN::Groonga

  $WWW::WuFoo::VERSION = '0.007';
}

use strict;
use warnings;
use Moose;
use LWP::UserAgent;
use JSON;

use WWW::WuFoo::Form;
use WWW::WuFoo::User;
use Data::Dumper;

# ABSTRACT: Interface to WuFoo.c

ash eq $opts{hash};
    }
}

sub forms {
    my ($self, $opts) = @_;
    my $url = '/api/v3/forms.json?IncludeTodayCount=true';

    my @arr;
    my $obj = $self->do_request($url)->{Forms};

    forea

 return \@arr;
}

sub users {
    my ($self) = @_;
    
    my @arr;
    my $url = '/api/v3/users.json';
    my $users = $self->do_request($url)->{Users};
    foreach my $user (@$users) {
        my $

RSION = '0.007';
}

use diagnostics;
use Moose;
use WWW::WuFoo::Field;
use WWW::WuFoo::Entry;
use JSON;
use Data::Dumper;

# ABSTRACT: The Forms API is used to gather details about the forms you have 

 ($pagestart == 0 || $entries > 0) {
        my $url = '/api/v3/forms/' . $self->hash . '/entries.json?pageSize=100&pageStart=' . $pagestart;
        my $ref = $self->_wufoo->do_request($url)->{Entrie

 {
    my ($self) = @_;
    
    my @arr;
    my $url = '/api/v3/forms/' . $self->hash . '/fields.json';
    my $ref = $self->_wufoo->do_request($url)->{Fields};

#    my $orderby = 0;
    foreach my 

subdomain'   => (is => 'rw', isa => 'Str');
has 'xml'         => (is => 'rw', isa => 'Str');
has 'json'        => (is => 'rw', isa => 'Str');
has 'formid'      => (is => 'rw', isa => 'Str');
has 'pret