File Coverage

blib/lib/Text/Mining/Parser/Text.pm

Criterion	Covered	Total	%
statement	3	3	100.0
branch			n/a
condition			n/a
subroutine	1	1	100.0
pod			n/a
total	4	4	100.0

package Text::Mining::Parser::Text;
use base qw(Text::Mining::Parser::Base);
use Class::Std;
use Class::Std::Utils;

use warnings;
use strict;
use Carp;

use version; our $VERSION = qv('0.0.8');

{
	sub version { return "Text::Mining::Parser::Text Version $VERSION"; }

	sub _get_all_text() {
		my ($self, $arg_ref) = @_;
		my $document = $self->get_document();
		my $text = $self->_get_file_text( $document->get_file_name() );
		return $text;
	}

	sub _get_next_line() {
		my ($self, $arg_ref) = @_;
		return;
	}


}

1; # Magic true value required at end of module
__END__