| 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} = "\x54\x55\x55\x55\x15\x55\x55\x55\x15\x55\x55\x55\x55\x55\x55\x55\x55\x15"} 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 |