| line |
true |
false |
branch |
|
73
|
0 |
0 |
if ($x =~ /^debug$/i) { } |
|
|
0 |
0 |
elsif (-f "$x") { } |
|
86
|
2 |
8 |
if -e $_ |
|
97
|
0 |
64 |
if ($Mail::ExpandAliases::DEBUG) |
|
113
|
0 |
2 |
unless defined $file |
|
164
|
0 |
2 |
unless my $fh = 'File::Aliases'->new($file) |
|
169
|
20 |
30 |
if $line =~ /^#/ |
|
170
|
0 |
30 |
if $line =~ /^\s*$/ |
|
176
|
30 |
0 |
if ($line =~ s/^([^:]+)\s*:\s*//) { } |
|
212
|
2 |
24 |
if defined $original and $name eq $original |
|
214
|
4 |
20 |
if defined $$self[1]{$lcname} |
|
217
|
7 |
13 |
unless $$self[0]{$lcname} |
|
|
13 |
7 |
if (@names = @{[] unless $$self[0]{$lcname};}) |
|
225
|
4 |
14 |
if ($type eq '|' or $type eq '/') { } |
|
|
0 |
14 |
elsif ($type eq ':') { } |
|
|
1 |
13 |
elsif ($type eq '\\') { } |
|
261
|
13 |
0 |
wantarray ? : |
|
277
|
0 |
0 |
if defined $file |
|
297
|
0 |
0 |
wantarray ? : |
|
327
|
0 |
0 |
if (my $name = shift()) |
|
333
|
0 |
0 |
wantarray ? : |
|
356
|
2 |
0 |
if $fh |
|
367
|
0 |
52 |
unless defined $fh |
|
372
|
48 |
18 |
if (/^\S/) { } |