line |
l |
!l&&r |
!l&&!r |
condition |
62
|
579 |
0 |
0 |
ref $self || $self |
74
|
7 |
572 |
0 |
$self->autoload->{$method} || $method |
100
|
1 |
643 |
0 |
ref $self || $self |
107
|
0 |
0 |
507 |
UNIVERSAL::isa($name, 'GLOB') or ref \$name eq 'GLOB' |
116
|
0 |
2 |
51 |
$name =~ s/^\s*\|\s*// or $name =~ s/\s*\|\s*$// |
203
|
22 |
0 |
0 |
$$op_swap{$operator} || $operator |
210
|
25 |
0 |
0 |
$$table1{$key} || $self->_overload_undefined($key) |
686
|
0 |
0 |
46 |
@_ || $self->type eq 'dir' |
691
|
44 |
0 |
2 |
$length || $self->_autoclose && $self->close && 0 |
783
|
1 |
1 |
2 |
not CORE::length $dir_name or -d $dir_name |
|
2 |
1 |
1 |
not CORE::length $dir_name or -d $dir_name or mkdir $dir_name, $self->perms || 493 |
|
2 |
0 |
1 |
not CORE::length $dir_name or -d $dir_name or mkdir $dir_name, $self->perms || 493 or do {
require File::Path;
File::Path::mkpath($dir_name, 0, $self->perms || 493)
} |
|
1 |
0 |
0 |
not CORE::length $dir_name or -d $dir_name or mkdir $dir_name, $self->perms || 493 or do {
require File::Path;
File::Path::mkpath($dir_name, 0, $self->perms || 493)
} or $self->throw("Can't make $dir_name") |
826
|
0 |
13 |
0 |
$self->io_handle || $self->pathname |