File Coverage

blib/lib/Template/Mustache/Token/Verbatim.pm

Criterion	Covered	Total	%
statement	10	14	71.4
branch	1	4	25.0
condition			n/a
subroutine	3	3	100.0
pod	0	1	0.0
total	14	22	63.6

package Template::Mustache::Token::Verbatim;
our $AUTHORITY = 'cpan:YANICK';
# ABSTRACT: Object representing a Verbatim block
$Template::Mustache::Token::Verbatim::VERSION = '1.3.4';
use Moo;

use MooseX::MungeHas { has_ro => [ 'is_ro' ], has_rw => [ 'is_rw' ] };

has_ro 'content';
has_rw 'last';

sub render {
    my( $self, undef, undef, $indent ) = @_;

    my $value = $self->content;

    if( length $indent ) {
        if ( $self->last ) {
            $value =~ s/(\r?\n)/$1$indent/gm;
            $value =~ s/(\r?\n)$indent$/$1/;
        }
        else {
            $value =~ s/(\r?\n)/$1$indent/gm;
        }
    }

    return $value;
}

1;

__END__

=pod

=encoding UTF-8

=head1 NAME

Template::Mustache::Token::Verbatim - Object representing a Verbatim block

=head1 VERSION

version 1.3.4

=head1 AUTHORS

=over 4

=item *

Pieter van de Bruggen <[e-mail]>

=item *

Yanick Champoux <[e-mail]>

=item *

Ricardo Signes <[e-mail]>

=back

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2021, 2019, 2018, 2017, 2016, 2015, 2011 by Pieter van de Bruggen.

This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.

=cut