File Coverage

blib/lib/CPAN/Changes/Markdown/Filter.pm

Criterion	Covered	Total	%
statement	21	22	95.4
branch			n/a
condition			n/a
subroutine	6	7	85.7
pod	1	1	100.0
total	28	30	93.3

use 5.006;    # our
use strict;
use warnings;

package CPAN::Changes::Markdown::Filter;

# ABSTRACT: a simple plug-in based, staged text filter for Markdown translation

our $VERSION = '1.000002';

our $AUTHORITY = 'cpan:KENTNL'; # AUTHORITY











use Moo 1.000008 qw( with has );
use CPAN::Changes::Markdown::Filter::NodeUtil qw(mk_node_plaintext);














with 'CPAN::Changes::Markdown::Role::Filter';







has rules => (
  is      => ro =>,
  lazy    => 1,
  builder => sub {
    [];
  },
);







sub process {
  my ( $self, $input ) = @_;
  my (@input) = ( mk_node_plaintext($input) );
  for my $rule ( @{ $self->rules } ) {
    @input = $rule->filter(@input);
  }
  return join q{}, map { $_->to_s } @input;
}

1;

__END__