| line |
true |
false |
branch |
|
34
|
0 |
5 |
if @_ == 1 and $self->_is_a($_[0], "Module::Generic::Null")
|
|
35
|
4 |
1 |
if (@_)
|
|
38
|
4 |
0 |
if ($str =~ m[^(?<unit>\S+)[[:blank:]]+(?:(?:(?<start>\d+)-(?<end>\d+))|\*)/(?<size>\d+|\*)]) { }
|
|
41
|
3 |
1 |
if defined $+{'start'} and length $+{'start'}
|
|
42
|
3 |
1 |
if defined $+{'end'} and length $+{'end'}
|
|
43
|
4 |
0 |
if defined $+{'size'} and length $+{'size'}
|
|
51
|
0 |
5 |
unless $self->SUPER::init(@_)
|
|
64
|
4 |
1 |
if (defined $start or defined $end) { }
|
|
66
|
0 |
4 |
if ($start eq '*' and $end eq '*') { }
|
|
81
|
5 |
0 |
defined $size ? :
|
|
106
|
0 |
0 |
if (@_)
|
|
109
|
0 |
0 |
if (defined $v)
|
|
111
|
0 |
0 |
unless $v =~ /^\d+|\*$/
|