File Coverage

blib/lib/Object/Remote/CodeContainer.pm
Criterion Covered Total %
statement 5 5 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod 0 1 0.0
total 7 8 87.5


line stmt bran cond sub pod time code
1             package Object::Remote::CodeContainer;
2              
3 11     11   96 use Moo;
  11         13  
  11         145  
4              
5             has code => (is => 'ro', required => 1);
6              
7             sub call {
8 5     5 0 13 my $self = shift;
9 5         36 $self->code->(@_)
10             }
11              
12             1;