<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">NAME
    Data::Text::Simple - Data object for text in language.

SYNOPSIS
     use Data::Text::Simple;

     my $obj = Data::Text::Simple-&gt;new(%params);
     my $id = $obj-&gt;id;
     my $lang = $obj-&gt;lang;
     my $text = $obj-&gt;text;

METHODS
  "new"
     my $obj = Data::Text::Simple-&gt;new(%params);

    Constructor.

    *       "id"

            Id of record. Id could be positive natural number.

            It's optional.

            Default value is undef.

    *       "lang"

            Language ISO 639-1 code.

            It's optional.

    *       "text"

            Main text.

            It's required.

    Returns instance of object.

  "id"
     my $id = $obj-&gt;id;

    Get id.

    Returns number.

  "lang"
     my $lang = $obj-&gt;lang;

    Get language ISO 639-1 code.

    Returns string.

  "text"
     my $text = $obj-&gt;text;

    Get text.

    Returns string.

ERRORS
     new():
             From Mo::utils:
                     Parameter 'text' is required.
             From Mo::utils::Language:
                     Parameter 'lang' doesn't contain valid ISO 639-1 code.
                             Codeset: %s
                             Value: %s
             From Mo::utils::Number:
                     Parameter 'id' must be a positive natural number.
                             Value: %s

EXAMPLE
     use strict;
     use warnings;

     use Data::Text::Simple;

     my $obj = Data::Text::Simple-&gt;new(
             'id' =&gt; 7,
             'lang' =&gt; 'en',
             'text' =&gt; 'This is a text.',
     );

     # Print out.
     print 'Id: '.$obj-&gt;id."\n";
     print 'Language: '.$obj-&gt;lang."\n";
     print 'Text: '.$obj-&gt;text."\n";

     # Output:
     # Id: 7
     # Language: en
     # Text: This is a text.

DEPENDENCIES
    Mo, Mo::utils, Mo::utils::Language, Mo::utils::Number.

REPOSITORY
    &lt;https://github.com/michal-josef-spacek/Data-Text-Simple&gt;

AUTHOR
    Michal Josef �麖a�嶤k &lt;mailto:skim@cpan.org&gt;

    &lt;http://skim.cz&gt;

LICENSE AND COPYRIGHT
    穢 2023-2025 Michal Josef �麖a�嶤k

    BSD 2-Clause License

VERSION
    0.03

</pre></body></html>