line |
true |
false |
branch |
86
|
9 |
5 |
if $article =~ /=3D/ |
90
|
0 |
14 |
unless $mail |
95
|
1 |
13 |
if $mail->header('In-Reply-To') |
99
|
0 |
13 |
unless $subject |
100
|
0 |
13 |
if $subject =~ /::/ |
119
|
2 |
1 |
unless $subject =~ m[CPAN Upload:\s+([-\w/\.\+]+)]i |
123
|
0 |
1 |
unless $distvers =~ /\.(?:(?:tar\.|t)(?:gz|bz2)|zip)$/ |
127
|
0 |
1 |
unless $distvers =~ /\.(?:(?:tar\.|t)gz|zip)$/i |
131
|
0 |
1 |
if (@parts == 2) |
152
|
2 |
10 |
unless $status =~ /^(PASS|FAIL|UNKNOWN|NA)$/i |
160
|
10 |
0 |
unless $distversion =~ /\.(tar|tgz|zip)/ |
164
|
1 |
9 |
unless defined $dist |
165
|
1 |
8 |
unless defined $version |
170
|
0 |
8 |
if $encoding and $encoding eq 'base64' |
177
|
3 |
5 |
if $archname |
186
|
3 |
5 |
unless ($archname or $platform) |
187
|
1 |
2 |
if ($osname and $osvers) { } |
|
1 |
1 |
elsif ($osname) { } |
191
|
2 |
6 |
unless ($osname) |
196
|
2 |
1 |
unless $text |
197
|
1 |
0 |
if ($text =~ /$patterns/) { } |
201
|
0 |
0 |
if ($text =~ /$rx/i) |
207
|
1 |
0 |
if $osname |
239
|
0 |
68 |
unless $hdr =~ /.*;\s+(.*)\s*$/ |
241
|
0 |
68 |
if ($dt2 > $date2 + 1200) |
260
|
90 |
97 |
if (@fields) |
266
|
3 |
90 |
unless $index |
272
|
2 |
88 |
unless $fields{'mon'} and $fields{'year'} > 1998 |
297
|
15 |
26 |
if defined $rev |
300
|
7 |
15 |
unless defined $rev |
311
|
1 |
14 |
if ($head and $head =~ /v5\.\d+\.\d+ (RC\d+)/) |
312
|
0 |
1 |
if $extra |
317
|
3 |
12 |
if $extra |