| line |
true |
false |
branch |
|
13
|
29 |
0 |
!$_[2] ? :
|
|
16
|
0 |
0 |
!$_[2] ? :
|
|
256
|
5 |
76 |
if ($$self{'lazy'})
|
|
259
|
0 |
5 |
if ($self->is_dir and not -d $path) { }
|
|
|
0 |
10 |
elsif ($self->is_file and not -f $path) { }
|
|
275
|
0 |
43 |
if $self->volume
|
|
279
|
0 |
43 |
if utf8::is_utf8($uri)
|
|
294
|
3 |
127 |
if $self->path eq ''
|
|
297
|
120 |
7 |
substr($self->path, -1, 1) eq '/' ? :
|
|
313
|
1 |
14 |
if $self->path eq ''
|
|
319
|
0 |
0 |
if ($self->filename ne '')
|
|
320
|
0 |
0 |
if ((my $idx = rindex($self->filename, '.')) > 0) { }
|
|
332
|
3 |
0 |
if ($self->filename ne '')
|
|
333
|
1 |
2 |
if ((my $idx = rindex($self->filename, '.')) > 0)
|
|
343
|
1 |
54 |
if $self->path eq ''
|
|
345
|
1 |
53 |
if $self->path eq '/'
|
|
347
|
0 |
53 |
if $self->volume and $self->path eq $self->volume . ':/'
|
|
349
|
52 |
1 |
if ($self->is_dir) { }
|
|
362
|
57 |
5 |
if ($self->is_dir) { }
|
|
|
5 |
0 |
elsif ($self->is_file and -f $self->path) { }
|
|
363
|
0 |
57 |
$self->path eq '' ? :
|
|
365
|
2 |
55 |
unless -d $path
|
|
379
|
1 |
1 |
if ($self->is_abs) { }
|
|
388
|
5 |
0 |
if ($self->dirname)
|
|
391
|
5 |
0 |
if $parent ne $self->to_string
|
|
398
|
0 |
0 |
if ($self->is_abs)
|
|
399
|
0 |
0 |
if ($self->volume and $self->dirname eq $self->volume . ':/') { }
|
|
|
0 |
0 |
elsif ($self->dirname eq '/') { }
|
|
412
|
0 |
0 |
unless ($MIME_TYPES)
|
|
419
|
0 |
0 |
if (XXX) { }
|
|
422
|
0 |
0 |
if $$MIME_TYPES{'suffix'}{$suffix}[1]
|
|
430
|
0 |
0 |
if (not $$MIME_TYPES{'category'}{$type} and $type =~ m[\A(.+?)/]msu)
|
|
445
|
0 |
0 |
if ($self->mime_type) { }
|
|
461
|
0 |
0 |
if $self->mime_type
|