| line |
true |
false |
branch |
|
78
|
0 |
0 |
if ($opts{'count'}) |
|
82
|
0 |
0 |
unless my $ret = &$filter($sv) |
|
83
|
0 |
0 |
if (not &blessed($ret) and ref $ret eq "HASH") |
|
84
|
0 |
0 |
if $ret->{'sv'} |
|
91
|
0 |
0 |
if $opts{'count'} |
|
103
|
0 |
0 |
unless my $ret = &$filter($sv) |
|
105
|
0 |
0 |
if (not &blessed($ret) and ref $ret eq 'HASH') { } |
|
106
|
0 |
0 |
if $ret->{'sv'} |
|
107
|
0 |
0 |
if $ret->{'output'} |
|
115
|
0 |
0 |
if @output |
|
122
|
0 |
0 |
unless $count-- |
|
157
|
0 |
0 |
unless $filterpkg->can("build") |
|
162
|
0 |
0 |
if (my(%optspec) = $filterpkg->FILTER_OPTS) |
|
166
|
0 |
0 |
if (my(@argspec) = $filterpkg->FILTER_ARGS) |
|
237
|
0 |
0 |
unless $opts{'iv'} or $opts{'uv'} or $opts{'nv'} |
|
241
|
0 |
0 |
unless $sv->type eq "SCALAR" |
|
243
|
0 |
0 |
if ($opts{'nv'} and defined(my $nv = $sv->nv)) |
|
244
|
0 |
0 |
if defined $value and $nv != $value |
|
248
|
0 |
0 |
if ($opts{'iv'} and defined(my $iv = $sv->iv)) |
|
249
|
0 |
0 |
if defined $value and $iv != $value |
|
253
|
0 |
0 |
if ($opts{'uv'} and defined(my $uv = $sv->uv)) |
|
254
|
0 |
0 |
if defined $value and $uv != $value |
|
316
|
0 |
0 |
$opts{'ignorecase'} ? : |
|
318
|
0 |
0 |
if ($opts{'eq'}) { } |
|
|
0 |
0 |
elsif ($opts{'regexp'}) { } |
|
331
|
0 |
0 |
unless $sv->type eq "SCALAR" |
|
332
|
0 |
0 |
unless defined(my $pv = $sv->pv) |
|
333
|
0 |
0 |
unless $pv =~ /$pattern/u |
|
363
|
0 |
0 |
unless $sv->type eq "CODE" |
|
364
|
0 |
0 |
if ($opts{'xsub'}) |
|
365
|
0 |
0 |
unless $sv->is_xsub |
|
367
|
0 |
0 |
if ($opts{'package'}) |
|
368
|
0 |
0 |
$sv->glob ? : |
|
369
|
0 |
0 |
if $stash->stashname ne $opts{'package'} |
|
371
|
0 |
0 |
if ($opts{'file'}) |
|
372
|
0 |
0 |
if $sv->file ne $opts{'file'} |
|
376
|
0 |
0 |
if (my $symname = $sv->symname) { } |
|
427
|
0 |
0 |
if (not defined $opts{'fileno'} and ($inv->peek_token // "") =~ /^\d+$/u) |
|
431
|
0 |
0 |
if (defined(my $fileno = $opts{'fileno'})) { } |
|
434
|
0 |
0 |
unless $sv->type eq "IO" |
|
438
|
0 |
0 |
unless $imatch or $omatch |
|
440
|
0 |
0 |
$imatch ? : |
|
|
0 |
0 |
$omatch ? : |
|
449
|
0 |
0 |
unless $sv->type eq "IO" |
|
482
|
0 |
0 |
unless defined $package |
|
487
|
0 |
0 |
unless my $stash = $sv->blessed |
|
488
|
0 |
0 |
unless $stash->stashname eq $package |
|
525
|
0 |
0 |
unless defined $name |
|
532
|
0 |
0 |
unless $pad->type eq "PAD" |
|
533
|
0 |
0 |
unless my $sv = $pad->maybe_lexvar($name) |
|
544
|
0 |
0 |
unless $is_live or $opts{'inactive'} |
|
547
|
0 |
0 |
$is_live ? : |
|
583
|
0 |
0 |
unless defined $name |
|
588
|
0 |
0 |
unless $struct->type eq "C_STRUCT" |
|
590
|
0 |
0 |
unless $type->name eq $name |
|
618
|
0 |
0 |
if (my $vtbl = $opts{'vtbl'}) |
|
621
|
0 |
0 |
unless my(@magics) = $sv->magic |
|
623
|
0 |
0 |
unless defined $magic->vtbl and $magic->vtbl == $vtbl |
|
629
|
0 |
0 |
if $magic->obj |
|
631
|
0 |
0 |
if $magic->ptr |