| line |
true |
false |
branch |
|
130
|
56 |
0 |
unless ref $self
|
|
133
|
56 |
0 |
if ($line =~ /\[(?<picked>.)\]\s+(?<quantity>\d+)\s+(?<name>[^\s]+)\s*(\((?<value>[^\)]+)\)\s*)?("(?<description>[^"]+)"\s*)?(\[(?<case>[^\]]+)\]\s*)?/)
|
|
135
|
0 |
56 |
$+{'picked'} ne ' ' ? :
|
|
139
|
38 |
18 |
if (exists $+{'value'})
|
|
144
|
56 |
0 |
if (exists $+{'description'})
|
|
149
|
56 |
0 |
if (exists $+{'case'})
|
|
171
|
56 |
0 |
if (substr($line, 0, 1) ne "")
|
|
230
|
1 |
11 |
unless ($self->_attr_available($self->name))
|
|
236
|
10 |
1 |
$self->picked ? :
|
|
240
|
8 |
3 |
if ($self->_attr_available($self->value))
|
|
245
|
6 |
5 |
if ($self->_attr_available($self->description))
|
|
250
|
4 |
7 |
if ($self->_attr_available($self->case))
|