| 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\x05"}
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\x05"}
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\x05"}
grep {$_ ~~ qr/up|down/;} $direction
}
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
131
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
132
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
136
|
0 |
0 |
unless scalar @_ > 0
|
|
137
|
0 |
0 |
unless scalar @_ > 1
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
155
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
exists $args{'all'} ? :
|
|
|
0 |
0 |
if keys %args
|
|
|
0 |
0 |
if scalar @_ > 3
|
|
164
|
0 |
0 |
if ($search_term =~ /^\Q$tag_prefix\E(?<tag>.*)/ms)
|
|
165
|
0 |
0 |
unless ($self->tags)
|
|
167
|
0 |
0 |
unless $tag_uuid
|
|
172
|
0 |
0 |
if $task->type eq 'reward'
|
|
173
|
0 |
0 |
if ($task->completed and not $all)
|
|
176
|
0 |
0 |
if ($tag_uuid) { }
|
|
|
0 |
0 |
elsif ($task->id eq $search_term) { }
|
|
|
0 |
0 |
elsif ($task->text =~ /\Q$search_term\E/i) { }
|
|
177
|
0 |
0 |
unless $task->tags
|
|
178
|
0 |
0 |
if $task->tags->{$tag_uuid}
|
|
197
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
203
|
0 |
0 |
if (ref $results ne 'ARRAY')
|
|
224
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
232
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
235
|
0 |
0 |
if ($result->{'error'})
|
|
242
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
unless scalar @_ > 1
|
|
|
0 |
0 |
if scalar @_ > 2
|
|
244
|
0 |
0 |
if $DEBUG
|
|
256
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|
|
258
|
0 |
0 |
if $DEBUG
|
|
263
|
0 |
0 |
if ($DEBUG)
|
|
270
|
0 |
0 |
unless scalar @_ > 0
|
|
|
0 |
0 |
if scalar @_ > 1
|