| blib/lib/IO/Detect.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 24 | 49 | 48.9 |
| line | l | !l | condition | |
|---|---|---|---|---|
| 100 | 2 | 0 | 4 | $reftype eq 'GLOB' and *{$fh;}{'IO'} |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 113 | 6 | 0 | 0 | blessed $fh and $fh->DOES('IO::Handle') |
| 114 | 6 | 0 | 0 | blessed $fh and $fh->DOES('FileHandle') |
| 115 | 2 | 0 | 0 | blessed $fh and $fh->DOES('IO::All') |
| 128 | 4 | 0 | 0 | blessed $f and $f->DOES('IO::All') |
| 129 | 4 | 0 | 0 | blessed $f and $f->DOES('Path::Class::Entity') |
| 130 | 0 | 0 | 0 | length "$f" && _oneline("$f") |
| 4 | 0 | 0 | blessed $f and overload::Method($f, '""') | |
| 132 | 1 | 1 | 0 | length $f && _oneline $f |
| 1 | 1 | 2 | defined $f and not ref $f | |
| 140 | 3 | 0 | 0 | blessed $f and $f->DOES('URI::file') |
| 141 | 3 | 0 | 0 | blessed $f and $f->DOES('RDF::Trine::Node::Resource') |
| 194 | 27 | 0 | 2 | blessed $proto and $proto->isa('IO::Detect::SmartMatcher') |
| line | l | !l | condition |
|---|---|---|---|
| 48 | 3 | 8 | $_[0]{'exporter'} ||= sub { my $into = $_[0]{'into'}; my($name, $sym) = @{$_[1];}; foreach $_ (grep ref($_), $into->can($name)) { _croak("Refusing to overwrite local sub '${name}' with export from $class") if B::svref_2object($_)->STASH->NAME eq $into; } ; 'namespace::clean'->import(-'cleanee', $_[0]{'into'}, $name); BEGIN {${^WARNING_BITS} = "TUUU\025UUU\025UUUUUU\025"} no strict 'refs'; *{"${into}::$name";} = $sym; } |
| 149 | 1 | 9 | $$arg{'mode'} || '<' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 100 | 4 | 0 | 2 | $reftype eq 'IO' or $reftype eq 'GLOB' and *{$fh;}{'IO'} |
| 159 | 0 | 1 | 0 | shift() || $default_mode |