Wikibase::Datatype::Form - Wikibase form datatype.
use Wikibase::Datatype::Form; my $obj = Wikibase::Datatype::Form->new(%params); my $grammatical_features_ar = $obj->grammatical_features; my $id = $obj->id; my $representations_ar = $obj->representations; my $statements_ar = $obj->statements;
new
my $obj = Wikibase::Datatype::Form->new(%params);
Constructor.
Retruns instance of object.
grammatical_features
Grammatical features. Items of array are Q items. Parameter is optional.
id
Identifier of form. Parameter is optional.
representations
Representations. Items of array are Wikibase::Datatype::Value::Monolingual items. Parameter is optional.
statements
Statements. Items of array are Wikibase:Datatype::Statement items. Parameter is optional.
my $grammatical_features_ar = $obj->grammatical_features;
Get grammatical features.
Returns reference to array of Q items.
my $id = $obj->id;
Get form identifier.
Returns string.
my $representations_ar = $obj->representations;
Get representations.
Returns reference to array with Wikibase::Datatype::Value::Monolingual items.
my $statements_ar = $obj->statements;
Get statements.
Returns reference to array of Wikibase::Datatype::Statement items.
new(): From Mo::utils::check_array_object(): Grammatical feature isn't 'Wikibase::Datatype::Value::Item' object. Parameter 'grammatical_features' must be a array. Parameter 'representations' must be a array. Parameter 'statements' must be a array. Representation isn't 'Wikibase::Datatype::Value::Monolingual' object. Statement isn't 'Wikibase::Datatype::Statement' object.
use strict; use warnings; use Unicode::UTF8 qw(decode_utf8); use Wikibase::Datatype::Form; use Wikibase::Datatype::Snak; use Wikibase::Datatype::Statement; use Wikibase::Datatype::Value::Item; use Wikibase::Datatype::Value::String; use Wikibase::Datatype::Value::Monolingual; # Object. my $obj = Wikibase::Datatype::Form->new( 'grammatical_features' => [ # singular Wikibase::Datatype::Value::Item->new( 'value' => 'Q110786', ), # nominative case Wikibase::Datatype::Value::Item->new( 'value' => 'Q131105', ), ], 'id' => 'L469-F1', 'representations' => [ Wikibase::Datatype::Value::Monolingual->new( 'language' => 'cs', 'value' => 'pes', ), ], 'statements' => [ Wikibase::Datatype::Statement->new( 'snak' => Wikibase::Datatype::Snak->new( 'datatype' => 'string', 'datavalue' => Wikibase::Datatype::Value::String->new( 'value' => decode_utf8('pɛs'), ), 'property' => 'P898', ), ), ], ); # Get id. my $id = $obj->id; # Get counts. my $gr_count = @{$obj->grammatical_features}; my $re_count = @{$obj->representations}; my $st_count = @{$obj->statements}; # Print out. print "Id: $id\n"; print "Number of grammatical features: $gr_count\n"; print "Number of representations: $re_count\n"; print "Number of statements: $st_count\n"; # Output: # Id: L469-F1 # Number of grammatical features: 2 # Number of representations: 1 # Number of statements: 1
Mo, Mo::utils.
Wikibase datatypes.
https://github.com/michal-josef-spacek/Wikibase-Datatype
Michal Josef Špaček mailto:skim@cpan.org
http://skim.cz
© 2020-2022 Michal Josef Špaček
BSD 2-Clause License
0.20
To install Wikibase::Datatype, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Wikibase::Datatype
CPAN shell
perl -MCPAN -e shell install Wikibase::Datatype
For more information on module installation, please visit the detailed CPAN module installation guide.