File Coverage

blib/lib/TOBYINK/Test/Template.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 18 19 94.7


line stmt bran cond sub pod time code
1 3     3   712429 use 5.010001;
  3         30  
2 3     3   17 use strict;
  3         7  
  3         63  
3 3     3   13 use warnings;
  3         10  
  3         244  
4              
5             package TOBYINK::Test::Template;
6              
7             our $AUTHORITY = 'cpan:TOBYINK';
8             our $VERSION = '0.001000';
9              
10 3     3   1757 use Moo;
  3         36439  
  3         14  
11              
12             has foo => ( is => 'ro', required => 1 );
13              
14             has bar => ( is => 'rw', required => 0 );
15              
16             sub foo_bar {
17 9     9 0 142928 my ( $self ) = @_;
18 9         78 return join( q{ }, grep defined, $self->foo, $self->bar );
19             }
20              
21             1;
22              
23             __END__