CPAN::Groonga

ose>, L<HTML::TreeBuilder>, L<WWW::Mechanize>, L<Params::Validate>
L<XML::FeedPP>, L<DateTime>, L<JSON>, L<URI::Escape>, L<MIME::Types>,
L<File::MMagic>

=head1 INCOMPATIBILITIES

None reported.

=hea

kage Net::Google::Code::Role::Predefined;
use Any::Moose 'Role';
use Params::Validate ':all';
use JSON;
with 'Net::Google::Code::Role::Fetchable';

has 'predefined_status' => (
    isa => 'HashRef',
 

ut luck :(
        $mech->update_html(<<"EOF");
<form action="${base_url}feeds/${last_name}OptionsJSON"
method="POST" >
<input type="text" name="token" value="$token" />
<input type="submit" value="su

er => 1 );
        die "failed to post to OptionsJSON page" unless $mech->success;

        my $js     = $mech->content;
        my $object = from_json $js;
        return unless $object;

        $se