/tmp/O9qlxPv8O2 | |||
---|---|---|---|
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 | 3 | 3 | 8095583 | use Storable (); | |||
3 | 14 | ||||||
3 | 74 | ||||||
3 | 3 | 3 | 494 | has foo => ( | |||
3 | 6 | ||||||
3 | 306 | ||||||
4 | is => 'ro', | ||||||
5 | clone => 'cloner_for_%s', | ||||||
6 | ); | ||||||
7 | my ( $self, $attrname, $value ) = @_; | ||||||
8 | Storable::dclone( $value ); | ||||||
9 | 4 | 4 | 12 | } | |||
10 | 4 | 160 | 1; |