Perl x Open Food Facts Hackathon: Paris, France - May 24-25 Learn more
1234567891011121314 use strict;use warnings;use Test::More 'tests' => 2;use Test::NoWarnings;use Wikibase::Datatype::Sitelink;# Test.my $obj = Wikibase::Datatype::Sitelink->new( 'site' => 'enwiki', 'title' => 'Title',);my $ret = $obj->title;is_deeply($ret, 'Title', 'Get title() method.');
use
strict;
warnings;
Test::More
'tests'
=> 2;
Test::NoWarnings;
Wikibase::Datatype::Sitelink;
# Test.
my
$obj
= Wikibase::Datatype::Sitelink->new(
'site'
=>
'enwiki'
,
'title'
'Title'
);
$ret
=
->title;
is_deeply(
'Get title() method.'