
WebService::Recruit::AbRoad::Country - AB-ROAD Web Service "country" API

use WebService::Recruit::AbRoad;
my $service = WebService::Recruit::AbRoad->new();
my $param = {
'key' => $ENV{'WEBSERVICE_RECRUIT_KEY'},
};
my $res = $service->country( %$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 "country: $data->country\n";
print "...\n";

This module is a interface for the country API. It accepts following query parameters to make an request.
my $param = {
'key' => 'XXXXXXXX',
'area' => 'EUR',
'country' => 'BE',
'keyword' => 'ãããã ',
'in_use' => 'XXXXXXXX',
'order' => 'XXXXXXXX',
'start' => 'XXXXXXXX',
'count' => 'XXXXXXXX',
};
my $res = $service->country( %$param );
$service above is an instance of WebService::Recruit::AbRoad.

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->country
$root->country->[0]->code
$root->country->[0]->name
$root->country->[0]->name_en
$root->country->[0]->tour_count
$root->country->[0]->area
$root->country->[0]->area->code
$root->country->[0]->area->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;


RECRUIT Media Technology Labs <mtl@cpan.org>

Copyright 2008 RECRUIT Media Technology Labs