File Coverage

blib/lib/Stenciller/Utils.pm

Criterion	Covered	Total	%
statement	93	104	89.4
branch	9	30	30.0
condition			n/a
subroutine	12	13	92.3
pod			n/a
total	114	147	77.5

use Stenciller::Standard;
use strict;
use warnings;

# PODNAME: Stenciller::Utils

role Stenciller::Utils using Moose {

    our $VERSION = '0.1302'; # VERSION:

    method eval_to_hashref(Str $possible_hash!, Path|Str $faulty_file! --> HashRef) {
        my $settings = eval $possible_hash;
        die sprintf "Can't parse stencil start: <%s> in %s: %s", $possible_hash, $faulty_file, $@ if $@;
        return $settings;
    }
    method eval(Str $string!) {
        eval $string;
        die sprintf "Can't parse %s: %s", $string, $@ if $@;
        return 1;
    }
}

1;

__END__

=pod

=encoding UTF-8

=head1 NAME

Stenciller::Utils

=head1 VERSION

Version 0.1302, released 2015-11-28.

=head1 SOURCE

L<https://github.com/Csson/p5-Stenciller>

=head1 HOMEPAGE

L<https://metacpan.org/release/Stenciller>

=head1 AUTHOR

Erik Carlsson <[e-mail]>

=head1 COPYRIGHT AND LICENSE

This software is copyright (c) 2015 by Erik Carlsson.

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