| line |
true |
false |
branch |
|
220
|
0 |
0 |
if ($self->{'readfile'}) |
|
225
|
0 |
0 |
if ($self->{'writefile'}) |
|
230
|
0 |
0 |
if ($self->{'readdir'}) |
|
243
|
0 |
0 |
if ($self->{'BORDER'} eq '') |
|
281
|
0 |
0 |
if (not ref $code) { } |
|
306
|
0 |
0 |
if ($row =~ /$border/) |
|
340
|
0 |
0 |
wantarray ? : |
|
364
|
0 |
0 |
if ($file =~ /\.(pm|pl|cgi)$/i) { } |
|
378
|
0 |
0 |
unless my $file = shift() |
|
403
|
0 |
0 |
unless my $directory = shift() |
|
419
|
0 |
0 |
if ($poddir) |
|
426
|
0 |
0 |
unless (-e $p) |
|
433
|
0 |
0 |
if ($updateonly) |
|
434
|
0 |
0 |
unless ($filecontent =~ /$border/ or $filecontent =~ /AUTOPODME/) |
|
437
|
0 |
0 |
if ($pod) |
|
445
|
0 |
0 |
if $verbose and $fileout |
|
465
|
0 |
0 |
wantarray ? : |
|
483
|
0 |
0 |
if (-d $d) |
|
507
|
0 |
0 |
unless ($d =~ /^\.\.?/) |
|
510
|
0 |
0 |
wantarray ? : |
|
536
|
0 |
0 |
if ($para{'onlyFiles'} ne '') |
|
541
|
0 |
0 |
if ($i =~ /^\.\.?$/) |
|
543
|
0 |
0 |
if (-d $i) |
|
546
|
0 |
0 |
if (exists $para{'ext'}) |
|
547
|
0 |
0 |
if ($i =~ /\.$ext$/i) { } |
|
550
|
0 |
0 |
if ($ok == 1) |
|
582
|
0 |
0 |
unless my $arr = shift() |
|
595
|
0 |
0 |
if ($line =~ /^\s*\#/ || $p == 0 and $self->{'STATE'} eq 'headwait') { } |
|
|
0 |
0 |
elsif ($line =~ /^\s*$/ || $p == 0 and $self->{'STATE'} eq 'head') { } |
|
601
|
0 |
0 |
if (exists $self->{'METHOD_ATTR'}{$self->_getMethodName}{'doxyparamline'} and scalar @{$self->{'METHOD_ATTR'}{$self->_getMethodName}{'doxyparamline'};} > 0) |
|
605
|
0 |
0 |
unless ($methodlinerest =~ /\{\s+.+/) |
|
610
|
0 |
0 |
unless ($firstword =~ /^[\$\@\%]/) |
|
626
|
0 |
0 |
if ($self->{'STATE'} eq 'headwait' and not $line =~ /^\s*$/ and not $line =~ /^\s*\#/) |
|
631
|
0 |
0 |
if ($line =~ /^\s*\}/ || $p == 0 || $line =~ /^\s*sub [^ ]+/ and $self->{'STATE'} =~ /^(head|headwait|bodywait|free)$/) |
|
639
|
0 |
0 |
if ($self->{'STATE'} eq 'head') |
|
640
|
0 |
0 |
if ($line =~ /^\s*#\s*\@return\s+(.*)/) |
|
646
|
0 |
0 |
unless ($retval =~ /^[\$\@\%]/) |
|
648
|
0 |
0 |
if (exists $self->{'METHOD_ATTR'}{$self->_getMethodName}{'returnline'}) { } |
|
662
|
0 |
0 |
if ($line =~ /^\s*#\s*\@brief\s+(.*)/) |
|
668
|
0 |
0 |
if ($line =~ /^\s*#\s*\@param\s+(.*)/) |
|
684
|
0 |
0 |
if ($self->{'STATE'} eq 'head' or $self->{'STATE'} eq 'free') |
|
686
|
0 |
0 |
if ($line =~ /^\s*#\s*-\s+(.*)/) { } |
|
|
0 |
0 |
elsif ($self->{'SUB_STATE'} eq 'listitem') { } |
|
689
|
0 |
0 |
if ($self->{'SUB_STATE'} ne 'listitem') |
|
713
|
0 |
0 |
if ($line =~ /^\s*sub [^ ]+/) |
|
722
|
0 |
0 |
if ($writeOut) |
|
723
|
0 |
0 |
if ($self->{'STATE'} eq 'head') { } |
|
|
0 |
0 |
elsif ($self->{'STATE'} eq 'body') { } |
|
730
|
0 |
0 |
if ($line =~ /^\s*package ([^\;]+)\;(.*)/) |
|
736
|
0 |
0 |
if ($line =~ /^\s*use +([^\; ]+)[\; ](.*)/) |
|
745
|
0 |
0 |
if ($line =~ /^\s*use base +([^\; ]+)[\;](.*)/ or $line =~ /^\s*our +\@ISA +([^\; ]+)[\;](.*)/) |
|
754
|
0 |
0 |
if $n |
|
762
|
0 |
0 |
if (exists $self->{'METHOD_ATTR'}{'new'} or scalar $self->{'INHERITS_FROM'} >= 1) |
|
767
|
0 |
0 |
unless (exists $self->{'PKGNAME'}) |
|
792
|
0 |
0 |
unless my $arr = shift() |
|
803
|
0 |
0 |
if ($line =~ /^\s*\#+(.*)/ and $state =~ /^(wait|rem)$/) { } |
|
|
0 |
0 |
elsif (not $line =~ /^\s*\#+(.*)/ and $state =~ /^(rem)$/) { } |
|
809
|
0 |
0 |
if ($text =~ /^\s*\@brief\s+(.*)/i) |
|
836
|
0 |
0 |
unless my $arr = $v->{'array'} |
|
851
|
0 |
0 |
if ($next =~ /^\s*(\={3,50})/) |
|
857
|
0 |
0 |
if ($i >= $nextok) |
|
895
|
0 |
0 |
if ($line =~ /^\s*return (.*)/) |
|
896
|
0 |
0 |
unless ($self->_getMethodReturn) |
|
939
|
0 |
0 |
if ($m) |
|
962
|
0 |
0 |
if ($s =~ /sub ([^ \{]+)(.*)/) |
|
1040
|
0 |
0 |
if (ref $s) { } |
|
1133
|
0 |
0 |
unless ($h =~ /^(\s*)$/) |
|
1136
|
0 |
0 |
if ($l > 0 and $l < $space) |
|
1143
|
0 |
0 |
if ($space != 99) |
|
1178
|
0 |
0 |
if ($o =~ /^([^ ]+)\s*\=\>\s*([^ ]+)$/) { } |
|
|
0 |
0 |
elsif ($o =~ /^([^ ]+) ([^ ]+)$/) { } |
|
|
0 |
0 |
elsif ($o =~ /^([^ \$\%\@]+)$/) { } |
|
|
0 |
0 |
elsif ($o =~ /^([\$\%\@\\]+)(.*)$/) { } |
|
1192
|
0 |
0 |
if ($typec eq '$') |
|
1193
|
0 |
0 |
if ($typec eq '\\$') |
|
1194
|
0 |
0 |
if ($typec eq '%') |
|
1195
|
0 |
0 |
if ($typec eq '\\%') |
|
1196
|
0 |
0 |
if ($typec eq '@') |
|
1197
|
0 |
0 |
if ($typec eq '\\@') |
|
1198
|
0 |
0 |
if ($typec eq '&') |
|
1199
|
0 |
0 |
if ($typec eq '\\&') |
|
1257
|
0 |
0 |
if (scalar @$re > 0) |
|
1265
|
0 |
0 |
unless ($dontshow{$name}) |
|
1269
|
0 |
0 |
if ($name ne $self->{'PKGNAME'}) |
|
1297
|
0 |
0 |
if (scalar @$re > 0) |
|
1305
|
0 |
0 |
unless ($dontshow{$name}) |
|
1342
|
0 |
0 |
unless (exists $def{$n}) |
|
1349
|
0 |
0 |
if (exists $parts->{$area}) |
|
1382
|
0 |
0 |
if $self->{'PKGNAME_DESC'} |
|
1414
|
0 |
0 |
if (scalar @$desc > 0) |
|
1444
|
0 |
0 |
if (exists $attr->{'new'}) |
|
1452
|
0 |
0 |
if ($method eq '') |
|
1454
|
0 |
0 |
if ($method =~ /^\_/) |
|
1456
|
0 |
0 |
if ($self->{'alsohiddenmethods'}) |
|
1459
|
0 |
0 |
if ($ok) |
|
1460
|
0 |
0 |
if ($method ne 'new') |
|
1483
|
0 |
0 |
if ($self->{'ISCLASS'}) |
|
1498
|
0 |
0 |
if ($retstring) { } |
|
|
0 |
0 |
elsif ($paramstring) { } |
|
1510
|
0 |
0 |
if ($addit) |
|
1519
|
0 |
0 |
if ($mat->{'head'}) |
|
1521
|
0 |
0 |
if ($text) |
|
1542
|
0 |
0 |
if (exists $params->[0][0]{'type'} and $params->[0][0]{'type'} eq 'void') |
|
1555
|
0 |
0 |
if ($type ne 'keyvalue') { } |
|
1571
|
0 |
0 |
if (scalar @$params > 1 and $braces) |
|
1607
|
0 |
0 |
if (not -e $dir) |
|
1611
|
0 |
0 |
unless (-e $path . $p) |
|
1627
|
0 |
0 |
if ($p =~ m[/]) { } |
|
1630
|
0 |
0 |
if ($p =~ /^\.*$/) { } |