NAME

WQS::SPARQL::Result - Processing Wikidata Query Service SPARQL result.

SYNOPSIS

 use WQS::SPARQL::Result;

 my $obj = WQS::SPARQL::Result->new;
 my @res = $obj->result($result_hr, $vars_ar);

DESCRIPTION

Class which gets structure which is originally JSON result from Wikidata Query Service and parse values from it.

METHODS

new

 my $obj = WQS::SPARQL::Result->new;

Constructor.

• verbose

  Verbose module flag. If enabled dumps result JSON structure to STDERR.

  Default value is 0.

Returns instance of class.

result

 my @res = $obj->result($result_hr, $vars_ar);

Select variables from structures and return list.

Method arguments:

$result_hr

Structure converted from JSON string.

$vars_ar

Reference to array with keys, which we need to return.

Returns list of structures with key => value pairs.

ERRORS

 new():
         From Class::Utils::set_params():
                 Unknown parameter '%s'.

 result():
         Type '%s' doesn't supported.

EXAMPLE

 use strict;
 use warnings;

 use WQS::SPARQL::Result;

 my $result_hr = {
         'head' => {
                 'vars' => ['item'],
         },
         'results' => {
                 'bindings' => [{
                         'item' => {
                                 'type' => 'uri',
                                 'value' => 'http://www.wikidata.org/entity/Q27954834',
                         },
                 }],
         },
 };

 my $obj = WQS::SPARQL::Result->new;
 my @ret = $obj->result($result_hr, ['item']);

 # Dump out.
 foreach my $ret_hr (@ret) {
         print "{\n";
         foreach my $key (keys %{$ret_hr}) {
                 print "  $key => ".$ret_hr->{$key}.",\n";
         }
         print "},\n";
 }

 # Output:
 # {
 #   item => Q27954834,
 # },

DEPENDENCIES

Class::Utils, Data::Printer, Error::Pure, URI.

SEE ALSO

WQS::SPARQL::Query::Count

Simple SPARQL count query.

WQS::SPARQL::Query::Select

Simple SPARQL select query.

REPOSITORY

https://github.com/michal-josef-spacek/WQS-SPARQL-Result

AUTHOR

Michal Josef Špaček mailto:skim@cpan.org

http://skim.cz

LICENSE AND COPYRIGHT

© Michal Josef Špaček 2020-2023

BSD 2-Clause License

VERSION

0.03

cpanm WQS::SPARQL::Result

perl -MCPAN -e shell
install WQS::SPARQL::Result