NAME

Test::Shared::Fixture::Data::InfoBox::Person - Person info box fixture.

SYNOPSIS

use Test::Shared::Fixture::Data::InfoBox::Person;

my $obj = Test::Shared::Fixture::Data::InfoBox::Person->new;
my $items_ar = $obj->items;

METHODS

new

my $obj = Test::Shared::Fixture::Data::InfoBox::Person->new;

Constructor.

Returns instance of object.

items

my $items_ar = $obj->items;

Get list of items in info box.

Returns reference to array with Data::InfoBox::Item objects.

EXAMPLE

use strict;
use warnings;

use Test::Shared::Fixture::Data::InfoBox::Person;
use Unicode::UTF8 qw(encode_utf8);

my $obj = Test::Shared::Fixture::Data::InfoBox::Person->new;

# Print out.
my $num = 0;
foreach my $item (@{$obj->items}) {
        $num++;
        print "Item $num: ".encode_utf8($item->text->text)."\n";
}

# Output:
# Item 1: Michal Josef Špaček
# Item 2: +420777623160

DEPENDENCIES

Data::InfoBox, Data::InfoBox::Item, Data::Text::Simple, Unicode::UTF8.

REPOSITORY

https://github.com/michal-josef-spacek/Data-InfoBox

AUTHOR

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

http://skim.cz

LICENSE AND COPYRIGHT

© 2024-2025 Michal Josef Špaček

BSD 2-Clause License

VERSION

0.06