| line |
true |
false |
branch |
|
40
|
3 |
0 |
unless ($self->agent)
|
|
53
|
0 |
0 |
if scalar @_ > 0
|
|
56
|
0 |
0 |
scalar @_ > 0 ? :
|
|
|
0 |
0 |
unless do {
BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x45\x55\x55\x55\x01"}
grep {$_ ~~ qr/^(?: habits | habit | dailys | daily | todos | todo | rewards | reward | )$/x;} $type
}
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
57
|
0 |
0 |
if ($type)
|
|
58
|
0 |
0 |
unless ($type =~ /s$/)
|
|
68
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
77
|
0 |
0 |
unless exists $args{'type'}
|
|
|
0 |
0 |
unless do {
BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x45\x55\x55\x55\x01"}
grep {$_ ~~ qr/^(?: habit | daily | todo | reward )$/x;} $type
}
|
|
78
|
0 |
0 |
unless exists $args{'text'}
|
|
80
|
0 |
0 |
exists $args{'value'} ? :
|
|
81
|
0 |
0 |
exists $args{'note'} ? :
|
|
82
|
0 |
0 |
exists $args{'up'} ? :
|
|
83
|
0 |
0 |
exists $args{'down'} ? :
|
|
84
|
0 |
0 |
exists $args{'extend'} ? :
|
|
|
0 |
0 |
if keys %args
|
|
|
0 |
0 |
if scalar @_ > 16
|
|
90
|
0 |
0 |
$up ? :
|
|
91
|
0 |
0 |
$down ? :
|
|
118
|
0 |
0 |
unless scalar @_ > 0
|
|
119
|
0 |
0 |
unless scalar @_ > 1
|
|
|
0 |
0 |
unless do {
BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x45\x55\x55\x55\x01"}
grep {$_ ~~ qr/up|down/;} $direction
}
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
129
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
130
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
134
|
0 |
0 |
unless scalar @_ > 0
|
|
135
|
0 |
0 |
unless scalar @_ > 1
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
153
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
exists $args{'all'} ? :
|
|
|
0 |
0 |
if keys %args
|
|
|
0 |
0 |
if scalar @_ > 3
|
|
162
|
0 |
0 |
if ($search_term =~ /^\Q$tag_prefix\E(?<tag>.*)/ms)
|
|
163
|
0 |
0 |
unless ($self->tags)
|
|
165
|
0 |
0 |
unless $tag_uuid
|
|
170
|
0 |
0 |
if $task->type eq 'reward'
|
|
171
|
0 |
0 |
if ($task->completed and not $all)
|
|
174
|
0 |
0 |
if ($tag_uuid) { }
|
|
|
0 |
0 |
elsif ($task->id eq $search_term) { }
|
|
|
0 |
0 |
elsif ($task->text =~ /\Q$search_term\E/i) { }
|
|
175
|
0 |
0 |
unless $task->tags
|
|
176
|
0 |
0 |
if $task->tags->{$tag_uuid}
|
|
195
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
201
|
0 |
0 |
if (ref $results ne 'ARRAY')
|
|
222
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
230
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
233
|
0 |
0 |
if ($result->{'error'})
|
|
240
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
unless scalar @_ > 1
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
242
|
0 |
0 |
if $DEBUG
|
|
254
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
256
|
0 |
0 |
if $DEBUG
|
|
261
|
0 |
0 |
if ($DEBUG)
|
|
268
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|