| line |
true |
false |
branch |
|
28
|
3 |
2 |
unless defined $txt |
|
30
|
1 |
4 |
unless (defined $tab_started) |
|
35
|
1 |
0 |
if ($tab_started eq '') { } |
|
|
0 |
0 |
elsif ($tab_started =~ /^e\s+(.*)$/) { } |
|
44
|
0 |
0 |
if ($prefix) |
|
45
|
0 |
0 |
if ('File::Spec'->file_name_is_absolute($prefix)) { } |
|
55
|
0 |
0 |
if (-e $path) { } |
|
56
|
0 |
0 |
if (-f $path) { } |
|
|
0 |
0 |
elsif (-d $path) { } |
|
72
|
0 |
0 |
if (opendir my $dh, $dir) |
|
73
|
0 |
0 |
-d 'File::Spec'->catfile($dir, "$prefix$_") ? : |
|
76
|
0 |
0 |
if $_ ne '.' |
|
84
|
0 |
5 |
unless @current_options |
|
87
|
1 |
4 |
if ($shift) { } |
|
88
|
1 |
0 |
if ($last_tab eq 'for') |
|
95
|
0 |
4 |
if ($last_tab eq 'back') |