The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

 Indent::String - Class for text indenting.

SYNOPSIS

 use Indent::String;
 my $indent = Indent::String->new(%parameters);
 $indent->indent('text text text');

METHODS

new(%parameters)
 Constructor.
  • line_size

     Sets indent line size value.
     Default value is 79.
  • next_indent

     Sets output separator between indented datas for string context.
     Default value is "\t" (tabelator).
  • output_separator

     Output separator between data in scalar context.
     Default value is "\n" (new line).
indent($data, [$indent, $non_indent])
 Indent text by words to line_size block size.
 $act_indent - Actual indent string. Will be in each output string.
 $non_indent - Is flag for non indenting. Default is 0.

ERRORS

 new():
         From Class::Utils::set_params():
                 Unknown parameter '%s'.
         From Indent::Utils::line_size_check():
                 'line_size' parameter must be a positive number.
                         line_size => %s

EXAMPLE

 # Pragmas.
 use strict;
 use warnings;

 # Modules.
 use Indent::String;

 # Object.
 my $i = Indent::String->new(
         'line_size' => 20,
 );

 # Indent.
 print $i->indent(join(' ', ('text') x 7))."\n";

 # Output:
 # text text text text
 # <--tab->text text text

DEPENDENCIES

Class::Utils, Indent::Utils, Readonly.

SEE ALSO

Indent, Indent::Block, Indent::Data, Indent::Utils.

REPOSITORY

https://github.com/tupinek/Indent

AUTHOR

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

http://skim.cz

LICENSE AND COPYRIGHT

BSD license.

VERSION

0.01