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