The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

WebService::Recruit::Shingaku::School - Recruit Shingaku net Web Service "school" API

SYNOPSIS

    use WebService::Recruit::Shingaku;
    
    my $service = WebService::Recruit::Shingaku->new();
    
    my $param = {
        'key' => $ENV{'WEBSERVICE_RECRUIT_KEY'},
        'keyword' => 'æ•°å­¦',
        'pref_cd' => '12',
    };
    my $res = $service->school( %$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 "school: $data->school\n";
    print "...\n";

DESCRIPTION

This module is a interface for the school API. It accepts following query parameters to make an request.

    my $param = {
        'key' => 'XXXXXXXX',
        'code' => 'SC999999',
        'name' => '銀座大学',
        'kana' => 'リクルート',
        'faculty' => '広告学部',
        'department' => 'メディア学科',
        'pref_cd' => '13',
        'category_cd' => '11',
        'address' => '�京都中央区銀座8',
        'lat' => '35.66922072646455',
        'lng' => '139.7614574432373',
        'range' => 'XXXXXXXX',
        'datum' => 'XXXXXXXX',
        'station' => 'æ–°æ©‹',
        'keyword' => '�京 広告',
        'subject_cd' => 'a1010',
        'work_cd' => 'a2010',
        'order' => 'XXXXXXXX',
        'start' => 'XXXXXXXX',
        'count' => 'XXXXXXXX',
    };
    my $res = $service->school( %$param );

$service above is an instance of WebService::Recruit::Shingaku.

METHODS

root

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->school
    $root->school->[0]->code
    $root->school->[0]->name
    $root->school->[0]->kana
    $root->school->[0]->campus
    $root->school->[0]->category
    $root->school->[0]->faculty
    $root->school->[0]->pref
    $root->school->[0]->urls
    $root->school->[0]->campus->[0]->name
    $root->school->[0]->campus->[0]->address
    $root->school->[0]->campus->[0]->datum
    $root->school->[0]->campus->[0]->latitude
    $root->school->[0]->campus->[0]->longitude
    $root->school->[0]->campus->[0]->station
    $root->school->[0]->category->code
    $root->school->[0]->category->name
    $root->school->[0]->faculty->[0]->name
    $root->school->[0]->faculty->[0]->department
    $root->school->[0]->pref->code
    $root->school->[0]->pref->name
    $root->school->[0]->urls->mobile
    $root->school->[0]->urls->pc
    $root->school->[0]->urls->qr

xml

This returns the raw response context itself.

    print $res->xml, "\n";

code

This returns the response status code.

    my $code = $res->code; # usually "200" when succeeded

is_error

This returns true value when the response has an error.

    die 'error!' if $res->is_error;

SEE ALSO

WebService::Recruit::Shingaku

AUTHOR

RECRUIT Media Technology Labs <mtl@cpan.org>

COPYRIGHT

Copyright 2008 RECRUIT Media Technology Labs

1 POD Error

The following errors were encountered while parsing the POD:

Around line 72:

Non-ASCII character seen before =encoding in ''æ•°å­¦','. Assuming CP1252