File Coverage

/tmp/gAOivc_9vn
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             use Mite::Shim;
2 3     3   9635700 use Sub::Quote qw(quote_sub);
  3         28  
  3         78  
3 3     3   588 has num =>
  3         20  
  3         644  
4             is => 'rw',
5             isa => quote_sub q{ $_[0] > 0 };
6             1;