line |
true |
false |
branch |
27
|
0 |
0 |
unless $element->isa($boolean)
|
28
|
0 |
0 |
$element ? :
|
163
|
0 |
0 |
unless defined $command and length $command
|
164
|
0 |
0 |
if exists $main_for{$command}
|
165
|
0 |
0 |
if (my $cb = $self->can("do_$command")) { }
|
177
|
0 |
0 |
unless $target->exists
|
234
|
0 |
0 |
if (defined $filename and length $filename) { }
|
235
|
0 |
0 |
if ($filename =~ /\A(['"])(.*)$1\z/msx)
|
262
|
0 |
0 |
unless length $a <=> length $b
|
282
|
0 |
0 |
if length $shorter > $length
|
291
|
0 |
0 |
if ref $rest and @$rest
|
292
|
0 |
0 |
if ref $rest
|
293
|
0 |
0 |
$type eq $current ? :
|
300
|
0 |
0 |
unless defined $type
|
302
|
0 |
0 |
unless exists $types->{$type}
|
308
|
0 |
0 |
if (defined $type and length $type) { }
|
309
|
0 |
0 |
if ($self->real_type($type)) { }
|
329
|
0 |
0 |
unless open my $fh, '<:raw', $file
|
335
|
0 |
0 |
if (my $attachments = $self->attachments_for($record->{'uuid'}))
|
363
|
0 |
0 |
if $type eq '*'
|
373
|
0 |
0 |
if ($id and exists $by_id->{$id}) { }
|
383
|
0 |
0 |
unless defined $query
|
385
|
0 |
0 |
unless length $query
|
393
|
0 |
0 |
if ($record->{'_yaml'} =~ /$query/i)
|
395
|
0 |
0 |
if ($last_printed_type ne $rt)
|
409
|
0 |
0 |
unless $type eq '*'
|
418
|
0 |
0 |
if $key_callback
|
419
|
0 |
0 |
unless $values_callback
|