File Coverage

blib/lib/Gears/Config/Reader.pm

Criterion	Covered	Total	%
statement	19	29	65.5
branch	1	2	50.0
condition			n/a
subroutine	5	7	71.4
pod	3	3	100.0
total	28	41	68.2

package Gears::Config::Reader;
$Gears::Config::Reader::VERSION = '0.101';
use v5.40;
use Mooish::Base -standard;

use Path::Tiny qw(path);

sub _get_contents ($self, $filename)
{
	return path($filename)->slurp({binmode => ':encoding(UTF-8)'});
}

sub handles ($self, $filename)
{
	foreach my $ex ($self->handled_extensions) {
		return true if $filename =~ m/\.\Q$ex\E$/;
	}

	return false;
}

# plain array, strings inside must not contain a dot
sub handled_extensions ($self)
{
	...;
}

sub parse ($self, $filename)
{
	...;
}

__END__