NAME

App::Translit::String - Perl class for translit-string application.

SYNOPSIS

use App::Translit::String;

my $obj = App::Translit::String->new;
my $exit_code = $obj->run;

METHODS

new

my $obj = App::Translit::String->new;

Constructor.

run

my $exit_code = $obj->run;

Run.

Returns 1 for error, 0 for success.

ERRORS

run():
        Cannot transliterate string.
                Error: %s
        No reverse transliteration.

EXAMPLE1

use strict;
use warnings;

use App::Translit::String;

# Run.
exit App::Translit::String->new->run;

# Print version.
sub VERSION_MESSAGE {
       print "9.99\n";
       exit 0;
}

# Output:
# Usage: /tmp/vm3pgIQWej [-h] [-r] [-t table] [--version]
#         string
# 
#         -h              Print help.
#         -r              Reverse transliteration.
#         -t table        Transliteration table (default value is 'ISO 9').
#         --version       Print version.

EXAMPLE2

use strict;
use warnings;

use App::Translit::String;

# Run.
@ARGV = ('Российская Федерация');
exit App::Translit::String->new->run;

# Output:
# Rossijskaâ Federaciâ

EXAMPLE3

use strict;
use warnings;

use App::Translit::String;

# Run.
@ARGV = ('-r', 'Rossijskaâ Federaciâ');
exit App::Translit::String->new->run;

# Output:
# Российская Федерация

DEPENDENCIES

English, Error::Pure, Getopt::Std, Lingua::Translit.

REPOSITORY

https://github.com/michal-josef-spacek/App-Translit-String.

AUTHOR

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

http://skim.cz

LICENSE AND COPYRIGHT

© 2015-2021 Michal Josef Špaček

BSD 2-Clause License

VERSION

0.09