line |
true |
false |
branch |
86
|
10 |
8 |
if $article =~ /=3D/ |
91
|
0 |
18 |
unless $mail |
96
|
2 |
16 |
if $mail->header('In-Reply-To') |
100
|
2 |
14 |
unless $subject |
101
|
1 |
13 |
if $subject =~ /::/ |
120
|
3 |
7 |
unless $subject =~ m[CPAN Upload:\s+([-\w/\.\+]+)]i |
124
|
2 |
5 |
unless $distvers =~ /\.(?:(?:tar\.|t)(?:gz|bz2)|zip)$/ |
128
|
1 |
4 |
unless $distvers =~ /\.(?:(?:tar\.|t)gz|zip)$/i |
132
|
1 |
4 |
if (@parts == 2) |
153
|
2 |
10 |
unless $status =~ /^(PASS|FAIL|UNKNOWN|NA)$/i |
161
|
10 |
0 |
unless $distversion =~ /\.(tar|tgz|zip)/ |
165
|
1 |
9 |
unless defined $dist |
166
|
1 |
8 |
unless defined $version |
171
|
0 |
8 |
if $encoding and $encoding eq 'base64' |
178
|
3 |
5 |
if $archname |
187
|
3 |
5 |
unless ($archname or $platform) |
188
|
1 |
2 |
if ($osname and $osvers) { } |
|
1 |
1 |
elsif ($osname) { } |
192
|
2 |
6 |
unless ($osname) |
197
|
2 |
1 |
unless $text |
198
|
1 |
0 |
if ($text =~ /$patterns/) { } |
202
|
0 |
0 |
if ($text =~ /$rx/i) |
208
|
1 |
0 |
if $osname |
240
|
0 |
68 |
unless $hdr =~ /.*;\s+(.*)\s*$/ |
242
|
0 |
68 |
if ($dt2 > $date2 + 1200) |
261
|
90 |
97 |
if (@fields) |
267
|
3 |
90 |
unless $index |
273
|
2 |
88 |
unless $fields{'mon'} and $fields{'year'} > 1998 |
298
|
15 |
26 |
if defined $rev |
301
|
7 |
15 |
unless defined $rev |
312
|
1 |
14 |
if ($head and $head =~ /v5\.\d+\.\d+ (RC\d+)/) |
313
|
0 |
1 |
if $extra |
318
|
3 |
12 |
if $extra |