/tmp/7r7HRMZctM | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 8 | 8 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 3 | 3 | 100.0 |
pod | n/a | ||
total | 11 | 11 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | use Mite::Shim; | ||||||
2 | 2 | 2 | 3879614 | use Storable (); | |||
2 | 8 | ||||||
2 | 36 | ||||||
3 | 2 | 2 | 327 | has foo => ( | |||
2 | 4 | ||||||
2 | 206 | ||||||
4 | is => 'ro', | ||||||
5 | clone => 'cloner_for_%s', | ||||||
6 | ); | ||||||
7 | my ( $self, $attrname, $value ) = @_; | ||||||
8 | Storable::dclone( $value ); | ||||||
9 | 2 | 2 | 8 | } | |||
10 | 2 | 74 | 1; |