CPAN::Groonga

package WebService::Eventful::JSON;

use strict;
use warnings;
use Carp;

=head1 NAME

WebService::Eventful::JSON - Use the JSON flavor of the Eventful API

=head1 SYNOPSIS

    my $evdb    = WebServi

tful->new(app_key => $app_key, flavor => 'json');
    my $results = $evdb->call('events/get', { id => 'E0-001-001336058-5' });

=head1 DESCRIPTION

Parses JSON from the Eventful API.

=head1 VERSION

'json' }

=head2 ctype

Return a checkstring for the expected return content type.

=cut

sub ctype { 'javascript' }

=head2 parse

Parse JSON data from the Eventful API using L<JSON::Syck> or L<JSON>

:Eventful->new(app_key => $app_key, flavor => 'yaml');

Valid flavors are C<rest>, C<yaml>, and C<json>.

=cut

sub new
{
  my $thing = shift;
  my $class = ref($thing) || $thing;
  
  my %params = @_