line |
true |
false |
branch |
19
|
0 |
3 |
if ($nofile) { } |
46
|
0 |
3 |
if (not $directories =~ m[[\\/]\Z(?!\n)]) { } |
66
|
0 |
24 |
if ($v) = $volume =~ m[^([\\/])[\\/][^\\/]+[\\/][^\\/]+\Z(?!\n)]s and $directory =~ m[^[^\\/]]s |
75
|
21 |
3 |
if (not $volume =~ /^[a-zA-Z]:\Z(?!\n)/s and $volume =~ m[[^\\/]\Z(?!\n)] and $file =~ m[[^\\/]]) |
80
|
21 |
0 |
$1 ? : |
91
|
0 |
24 |
unless @_ |
92
|
24 |
0 |
if $_[0] eq '' |
96
|
0 |
0 |
if $_[0] =~ /^$DRIVE_RX\z/o |
104
|
0 |
0 |
if $_[0] eq '' |
109
|
0 |
0 |
if $_[0] =~ /^$DRIVE_RX\z/o |
118
|
0 |
0 |
$2 ? : |
|
0 |
0 |
defined $2 ? : |
|
24 |
0 |
$first =~ s[ \A [\\/] ][]x ? : |
|
0 |
24 |
$first =~ s[ \A (?:\\\\|//) ([^\\/]+)
(?: [\\/] ([^\\/]+) )?
[\\/]? ][]sx ? : |
|
0 |
24 |
$first =~ s[ \A ([A-Za-z]:) ([\\/]?) ][]x ? : |
164
|
24 |
0 |
if ($volume =~ /\\\z/) |
172
|
0 |
24 |
if $path eq '' and $volume =~ /\A(\\\\.*)\\\z/s |
176
|
24 |
0 |
$path ne '' || $volume ? : |