line |
true |
false |
branch |
29
|
12 |
4 |
scalar @_ ? : |
30
|
1 |
15 |
unless (@args) |
38
|
1 |
17 |
unless (-e $arg) |
43
|
1 |
16 |
if (-l $arg) |
48
|
3 |
13 |
if (-f $arg) |
53
|
1 |
12 |
unless (-d $arg) |
66
|
19 |
10 |
unless -f $File::Find::name |
74
|
7 |
8 |
unless (@files) |
80
|
1 |
7 |
unless (@pod_files) |
87
|
1 |
11 |
unless ($self->pod_file_ok($file)) |
94
|
6 |
1 |
if $rc |
101
|
1 |
52 |
if @_ % 2 |
114
|
7 |
44 |
if (exists $args{'ignore'}) |
116
|
2 |
5 |
if (ref $ignore eq ref []) { } |
126
|
8 |
43 |
if (exists $args{'ignore_match'}) |
128
|
4 |
4 |
if (ref $ignore_match eq ref []) { } |
140
|
12 |
39 |
$ignore_regex ne '' ? : |
145
|
7 |
22 |
if $key eq 'ignore' |
146
|
8 |
14 |
if $key eq 'ignore_match' |
147
|
13 |
1 |
if $key eq 'ua' |
158
|
3 |
13 |
if @_ != 2 or not defined $file |
162
|
1 |
12 |
unless (-f $file) |
171
|
1 |
11 |
if ($pod->any_errata_seen) |
181
|
32 |
0 |
if defined $_ |
186
|
3 |
8 |
if (defined $ignore_regex) |
196
|
2 |
24 |
if exists $url_checked_in_this_file{$link} |
199
|
21 |
3 |
unless (exists $self->{'_cache'}{$link}) |
206
|
2 |
22 |
unless ($res->{'success'}) |
214
|
9 |
2 |
if $rc |
222
|
3 |
11 |
if (-d 'blib') { } |
|
6 |
5 |
elsif (-d 'lib') { } |
229
|
4 |
10 |
if (-d 'bin') |
233
|
2 |
12 |
if (-d 'script') |
244
|
2 |
138 |
if @_ != 2 or ref $node_ref ne ref [] or scalar @{$node_ref;} < 2 |
249
|
48 |
90 |
if ($elem_name eq 'L') |
255
|
161 |
124 |
if ref $subnode ne ref [] |
266
|
53 |
51 |
if (@_) |
277
|
56 |
13 |
if (@_) |
279
|
3 |
53 |
unless &Scalar::Util::blessed($ua) and $ua->can('head') |