The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Data::Message::Simple - Data object for simple message.

SYNOPSIS

 use Data::Message::Simple;

 my $obj = Data::Message::Simple->new(%params);
 my $lang = $obj->lang;
 my $text = $obj->text;
 my $type = $obj->type;

METHODS

new

 my $obj = Data::Message::Simple->new(%params);

Constructor.

  • lang

    Message language. It's optional. If defined, possible values are ISO 639-1 language codes.

    Default value is undef.

  • text

    Message text. Maximum length of text is 4096 characters. It's required.

  • type

    Message type. Possible value are 'error' and 'info'. It's required. Default value is 'info'.

Returns instance of object.

lang

 my $lane = $obj->lang;

Get ISO 639-1 language code of text.

Returns string.

text

 my $text = $obj->text;

Get message text.

Returns string.

type

 my $type = $obj->type;

Get message type.

Returns string.

ERRORS

 new():
         From Mo::utils:
                 Parameter 'text' has length greater than '4096'.
                         Value: %s
                 Parameter 'text' is required.
                         Value: %s
                 Parameter 'type' must be one of defined strings.
                         String: %s
                         Possible strings: %s
         From Mo::utils::Language:
                 Parameter 'lang' doesn't contain valid ISO 639-1 code.
                         Codeset: %s
                         Value: %s

EXAMPLE

 use strict;
 use warnings;

 use Data::Message::Simple;

 my $obj = Data::Message::Simple->new(
         'lang' => 'en',
         'text' => 'This is text message.',
 );

 # Print out.
 print 'Message type: '.$obj->type."\n";
 print 'ISO 639-1 language code: '.$obj->lang."\n";
 print 'Text: '.$obj->text."\n";

 # Output:
 # Message type: info
 # ISO 639-1 language code: en
 # Text: This is text message.

DEPENDENCIES

Mo, Mo::utils, Mo::utils::Language, Readonly.

REPOSITORY

https://github.com/michal-josef-spacek/Data-Message-Simple

AUTHOR

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

http://skim.cz

LICENSE AND COPYRIGHT

© 2023-2024 Michal Josef Špaček

BSD 2-Clause License

VERSION

0.04