name: $@\n" if not $namespace;
}
our %attributes = (
parse => 1,
format => 'JSON',
debug => 0,
throw_errors => 1,
api_version => '1.0',
apps_uri => 'h
arams .= "&$_=$params{$_}";
}
}
return $params;
}
sub _parser {
my $parser = JSON::Any->new;
$parser->handler->allow_nonref;
return $parser;
}
sub _parse {
my ( $sel
# Only load JSON::Any if we haven't already. Lets the developers
# pick their choice of JSON modules (JSON::DWIW, for example)
## no critic
eval q{use JSON::Any};
$id )
The fbml.getCustomTags method of the Facebook API.
=item register_custom_tags( tags => [@json_tags] )
The fbml.registerCustomTags method of the Facebook API.
=item set_ref_handle( handle =
is the only
parameter required.
$client->fbml->upload_native_strings(
native_strings => 'JSON'
);
The format for C<native_strings> is described on the developers wiki:
http://wiki.developer
my ( $format, $parse ) = ( $self->base->format, $self->base->parse );
$self->base->format('JSON');
$self->base->parse(0);
$token = $self->base->call( 'auth.createToken', @_ );
$tok
my ( $format, $parse ) = ( $self->base->format, $self->base->parse );
$self->base->format('JSON');
$self->base->parse(1);
my $resp = $self->base->call( 'auth.getSession', auth_token =>
acebook API:
$response = $client->connect->get_unconnected_friends_count(
format => $json,
);
=item register_users( %params )
The connect.registerUsers method of the Facebook API:
the Facebook API.
$result = $client->Admin->set_app_properties(
properties => encode_json {
application_name => 'testapp',
callback_url => 'http://example.com/testapp/'
method of the Facebook API.
$result = $client->Admin->set_restriction_info(
encode_json { age => '21+', location => 'us' }
);
=item ban_users( %params )
The Admin.banUsers method
$json,
data => $RAW_DATA,
);
=item edit( %params )
The events.edit method of the Facebook API:
$response = $client->events->edit(
eid => $eid,
event_info => $json,
s = @_;
if (ref($args{'action_links'}) eq 'ARRAY') {
eval q{use JSON::Any};
croak "Unable to load JSON module to encode 'action_links':$@\n" if $@;
$args{'action_links'} =
k API.
$client->stream->publish(
message => $message,
attachment => $json,
action_links => [@links],
);
=item remove( %params )
The stream.remove method of t
nt->feed->publish_user_action(
template_bundle_id => 'id',
template_data => 'JSON',
body_general => 'markup',
target_ids => [@array_of_ids],
);
template_bundle(
one_line_story_templates => 'JSON',
short_story_templates => 'JSON',
full_story_template => 'JSON',
);
The formats for C<one_line_story_templates>
e => 'markup',
title_data => 'JSON',
body_template => 'markup',
body_general => 'markup',
body_data => 'JSON',
image_1 => 'image url',
lient->profile->set_info(
title => 'title',
type => '1|5',
info_fields => 'JSON',
uid => 'user_id',
);
The format for C<info_fields> is described on the developer wik
ns(
field => 'field_title',
options => 'JSON',
);
The format for C<options> is described on the developer wiki:
http://wiki.developers.fa
x => 5,
y => 6,
);
or
$response = $client->photos->add_tag( tags => $json_serialized );
C<tag_text> is ignored if C<tag_uid> is set.
=item create_album( name => $name, l