line |
true |
false |
branch |
170
|
0 |
517 |
unless my $file = $self->file
|
199
|
9 |
327 |
if (my $oDocument = $self->cacheGet($keyCache, $file)) { }
|
210
|
9 |
325 |
if (my $oMeta = $self->cacheGet($keyCache, $file)) { }
|
238
|
2 |
325 |
unless my $oDocument = 'PPI::Document'->new($file)
|
276
|
180 |
4 |
if not $hStop{$_}
|
333
|
2 |
23 |
unless $row > 0
|
335
|
23 |
0 |
if $_->namespace
|
337
|
4 |
19 |
unless my(@aPackage) = grep({$_->location->[0] <= $row if $_->namespace;} @{$self->oMeta->raPackage;})
|
366
|
4 |
12 |
if $self->oMeta->moduleAt('row', $row, 'col', $col)
|
367
|
1 |
11 |
if $self->oMeta->rhMethodAt('row', $row, 'col', $col)
|
416
|
32 |
40 |
unless my $rhMethod = $self->oMeta->rhMethodAt('row', $row, 'col', $col)
|
419
|
32 |
8 |
if wantarray
|
420
|
7 |
1 |
defined $oObject ? :
|
440
|
10 |
13 |
unless $method
|
441
|
9 |
4 |
unless $object and $object eq '$self'
|
464
|
10 |
12 |
unless $module and $method
|
465
|
5 |
7 |
if $module =~ /[^\w:]/
|
467
|
5 |
2 |
if wantarray
|
490
|
10 |
7 |
unless $oObject and $oMethod
|
491
|
0 |
7 |
unless $oObject =~ /^\$\w+$/
|
493
|
0 |
7 |
unless my $oLocationSub = $self->oLocationEnclosingSub($oMethod)
|
544
|
15 |
113 |
if ($oLocation->rhProperty->{'nameSub'} eq $name and $oLocation->rhProperty->{'namePackage'} eq $package)
|
574
|
2 |
111 |
if ($row >= $oLocation->row and $row <= $oLocation->rhProperty->{'oLocationEnd'}->row)
|
610
|
11 |
7 |
unless ($package)
|
611
|
10 |
1 |
if ($row) { }
|
612
|
0 |
10 |
unless $package = $self->packageAt('row', $row)
|
622
|
12 |
6 |
if $oLocation
|
626
|
4 |
2 |
if $oLocation
|
630
|
0 |
2 |
unless my $oDocumentBase = $self->oPerlySense->oDocumentFindModule('nameModule', $moduleBase, 'dirOrigin', dirname($self->file))
|
635
|
2 |
0 |
if $oLocation
|
678
|
0 |
194 |
unless $lookFor eq 'method'
|
685
|
87 |
2766 |
if ($oLocationCur->rhProperty->{'pod'} =~ /^= \w+ \s+ [^\n]*? \b $rexName \b /x)
|
692
|
2 |
85 |
if $pod =~ /^=item\s/
|
700
|
3 |
104 |
if $ignoreBaseModules
|
704
|
1 |
97 |
unless my $oDocumentBase = $self->oPerlySense->oDocumentFindModule('nameModule', $moduleBase, 'dirOrigin', dirname($self->file))
|
708
|
53 |
44 |
if (my $oLocation = $oDocumentBase->oLocationPod('name', $name, 'lookFor', $lookFor))
|
713
|
47 |
6 |
unless ($oLocation->rhProperty->{'pod'} =~ /\n=head1 From <[\w:]+>\n$/)
|
787
|
7 |
59 |
if (my $rhPackageApi = $self->cacheGet($keyCache, $self->file)) { }
|
817
|
59 |
6623 |
if ($oNode->isa('PPI::Statement::Package'))
|
819
|
0 |
59 |
if keys %{$oApiCur->rhSub;}
|
829
|
408 |
6274 |
if ($oNode->isa('PPI::Statement::Sub') and not $oNode->forward)
|
835
|
59 |
0 |
if keys %{$oApiCur->rhSub;}
|
841
|
0 |
20 |
unless my $oDocumentBase = $self->oPerlySense->oDocumentFindModule('nameModule', $nameBase, 'dirOrigin', dirname($self->file))
|
847
|
0 |
20 |
if $nameModule eq $nameBase
|
887
|
0 |
20 |
unless my $oApiBase = $$rhPackageApiBase{$nameModuleBase}
|
890
|
0 |
20 |
unless $oApi
|
926
|
0 |
42 |
unless my $oApi = $self->rhPackageApiLikely->{$nameModule}
|
929
|
30 |
14 |
unless $oApi->isSubSupported($method)
|
988
|
33 |
663 |
if (index($match, 'sub') > -1)
|
989
|
1 |
32 |
if index($match, ':') > -1
|
992
|
76 |
587 |
if index($match, '=') > -1
|
1077
|
327 |
0 |
unless my $raList = $oNode->find($what)
|
1106
|
7 |
78 |
if ($row >= $oLocation->row and $row <= $oLocation->rhProperty->{'oLocationEnd'}->row)
|