WebService::Recruit::AbRoad::Spot - AB-ROAD Web Service "spot" API
use WebService::Recruit::AbRoad; my $service = WebService::Recruit::AbRoad->new(); my $param = { 'key' => $ENV{'WEBSERVICE_RECRUIT_KEY'}, }; my $res = $service->spot( %$param ); my $data = $res->root; print "api_version: $data->api_version\n"; print "results_available: $data->results_available\n"; print "results_returned: $data->results_returned\n"; print "results_start: $data->results_start\n"; print "spot: $data->spot\n"; print "...\n";
This module is a interface for the spot API. It accepts following query parameters to make an request.
spot
my $param = { 'key' => 'XXXXXXXX', 'spot' => 'XXXXXXXX', 'area' => 'EUR', 'country' => 'BE', 'city' => 'NYC', 'keyword' => '教会', 'start' => 'XXXXXXXX', 'count' => 'XXXXXXXX', }; my $res = $service->spot( %$param );
$service above is an instance of WebService::Recruit::AbRoad.
$service
This returns the root element of the response.
my $root = $res->root;
You can retrieve each element by the following accessors.
$root->api_version $root->results_available $root->results_returned $root->results_start $root->spot $root->spot->[0]->code $root->spot->[0]->name $root->spot->[0]->name_en $root->spot->[0]->title $root->spot->[0]->description $root->spot->[0]->lat $root->spot->[0]->lng $root->spot->[0]->map_scale $root->spot->[0]->area $root->spot->[0]->country $root->spot->[0]->city $root->spot->[0]->url $root->spot->[0]->area->code $root->spot->[0]->area->name $root->spot->[0]->country->code $root->spot->[0]->country->name $root->spot->[0]->city->code $root->spot->[0]->city->name
This returns the raw response context itself.
print $res->xml, "\n";
This returns the response status code.
my $code = $res->code; # usually "200" when succeeded
This returns true value when the response has an error.
die 'error!' if $res->is_error;
WebService::Recruit::AbRoad
RECRUIT Media Technology Labs <mtl@cpan.org>
Copyright 2008 RECRUIT Media Technology Labs
1 POD Error
The following errors were encountered while parsing the POD:
Non-ASCII character seen before =encoding in ''教会','. Assuming CP1252
To install WebService::Recruit::AbRoad, copy and paste the appropriate command in to your terminal.
cpanm
cpanm WebService::Recruit::AbRoad
CPAN shell
perl -MCPAN -e shell install WebService::Recruit::AbRoad
For more information on module installation, please visit the detailed CPAN module installation guide.