line |
true |
false |
branch |
52
|
72 |
12 |
if ('HASH' eq ref $data) { } |
55
|
72 |
0 |
if $$data{'data'} |
71
|
81 |
3 |
unless $file = $self->file($file) |
72
|
0 |
3 |
unless -f $file |
76
|
0 |
3 |
unless (open FILE, $file) |
103
|
67 |
28 |
if ('ARRAY' eq ref $data) { } |
108
|
0 |
28 |
if ref $data |
120
|
37 |
374 |
if ($line =~ s/$Mail::Procmailrc::RE{'blklinem'}/$1/) |
128
|
101 |
310 |
if ($line =~ s/$Mail::Procmailrc::RE{'flagsm'}/$1/) { } |
|
111 |
199 |
elsif ($line =~ s/$Mail::Procmailrc::RE{'varm'}/$1/) { } |
|
35 |
164 |
elsif ($line =~ /$Mail::Procmailrc::RE{'comm'}/) { } |
|
102 |
62 |
elsif ($line =~ /$Mail::Procmailrc::RE{'blank'}/) { } |
|
25 |
37 |
elsif ($line =~ /$Mail::Procmailrc::RE{'blkopen'}/) { } |
|
25 |
12 |
elsif ($line =~ /$Mail::Procmailrc::RE{'blkclose'}/) { } |
147
|
9 |
93 |
if (defined $$data[0] and $$data[0] =~ /$Mail::Procmailrc::RE{'blank'}/) |
149
|
5 |
4 |
unless $self->blockline |
173
|
37 |
344 |
if $self->blockline |
184
|
181 |
543 |
defined $data ? : |
215
|
0 |
1 |
unless $seek and ref $seek |
220
|
2 |
7 |
if $found |
221
|
6 |
1 |
unless $obj == $seek |
235
|
116 |
0 |
defined $self->level ? : |
238
|
37 |
79 |
if ($self->blockline) { } |
246
|
1 |
467 |
unless defined $elem |
262
|
3 |
0 |
if ($file) { } |
264
|
0 |
3 |
unless (open FILE, ">$file") |
272
|
0 |
0 |
unless $file |
284
|
0 |
0 |
defined $debug ? : |
291
|
6 |
81 |
defined $file ? : |
298
|
393 |
293 |
defined $$self{'Level'} ? : |
|
114 |
686 |
defined $level ? : |
309
|
37 |
506 |
defined $blockline ? : |
313
|
411 |
0 |
unless $Mail::Procmailrc::Debug |
330
|
183 |
227 |
if ref $defs |
349
|
0 |
629 |
unless ($defaults) |
354
|
446 |
183 |
unless (ref $defaults) |
355
|
0 |
440 |
defined $value ? : |
|
440 |
6 |
defined $$self{'DEFAULTS'}{$defaults} ? : |
371
|
240 |
556 |
if $data |
372
|
240 |
556 |
if $data |
373
|
203 |
593 |
if $data |
375
|
252 |
133 |
$$self{'DATA'} ? : |
|
411 |
385 |
defined $data ? : |
386
|
220 |
6 |
defined $self->defaults('level') ? : |
404
|
112 |
11 |
if $defs |
415
|
0 |
333 |
unless ($defaults) |
420
|
221 |
112 |
unless (ref $defaults) |
421
|
0 |
210 |
defined $value ? : |
|
210 |
11 |
defined $$self{'DEFAULTS'}{$defaults} ? : |
437
|
3 |
120 |
unless defined $data |
443
|
0 |
120 |
unless ($line =~ /$Mail::Procmailrc::RE{'var'}/) |
449
|
7 |
113 |
if ($line =~ /$Mail::Procmailrc::RE{'varmlq'}/) { } |
472
|
123 |
283 |
if $data |
474
|
123 |
283 |
defined $data ? : |
480
|
123 |
287 |
if $data |
482
|
126 |
284 |
defined $data ? : |
489
|
120 |
161 |
if ($data) |
505
|
105 |
11 |
defined $self->defaults('level') ? : |
511
|
0 |
0 |
unless $Mail::Procmailrc::Variable::Debug |
531
|
101 |
9 |
if $defs |
542
|
0 |
418 |
unless ($defaults) |
547
|
317 |
101 |
unless (ref $defaults) |
548
|
0 |
304 |
defined $value ? : |
|
304 |
13 |
defined $$self{'DEFAULTS'}{$defaults} ? : |
575
|
5 |
106 |
unless defined $data |
577
|
103 |
3 |
if ('ARRAY' eq ref $data) { } |
582
|
1 |
2 |
if ref $data |
592
|
0 |
105 |
unless ($line =~ /$Mail::Procmailrc::RE{'flags'}/) |
603
|
1 |
148 |
unless defined $line |
607
|
39 |
109 |
if ($line =~ s/$Mail::Procmailrc::RE{'comm'}/$1/) |
613
|
5 |
104 |
if ($line =~ /$Mail::Procmailrc::RE{'blank'}/) |
625
|
1 |
373 |
unless defined $line |
629
|
260 |
113 |
if ($line =~ s/$Mail::Procmailrc::RE{'condm'}/$1/) |
640
|
1 |
112 |
if ($line =~ /$Mail::Procmailrc::RE{'comt'}/) |
645
|
8 |
104 |
if ($line =~ /$Mail::Procmailrc::RE{'blank'}/) |
657
|
1 |
104 |
unless defined $line |
661
|
62 |
42 |
if ($line =~ /$Mail::Procmailrc::RE{'blkopen'}/) { } |
687
|
1 |
0 |
scalar @{$self->info;} ? : |
690
|
1 |
0 |
scalar @{$self->conditions;} ? : |
692
|
0 |
1 |
ref $self->action ? : |
701
|
121 |
13 |
defined $self->defaults('level') ? : |
709
|
63 |
71 |
scalar @{$self->info;} ? : |
714
|
103 |
31 |
scalar @{$self->conditions;} ? : |
718
|
63 |
71 |
ref $self->action ? : |
737
|
221 |
139 |
defined $data ? : |
748
|
5 |
358 |
if (defined $data and not ref $data) |
752
|
117 |
246 |
defined $data ? : |
761
|
115 |
506 |
defined $data ? : |
768
|
47 |
449 |
if $data and not ref $data |
770
|
220 |
276 |
defined $data ? : |