| blib/lib/Perl/Tidy/IOScalar.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 16 | 18.7 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 0 | 0 | if $AUTOLOAD =~ /\bDESTROY$/ |
| 29 | 0 | 0 | if $AUTOLOAD =~ /\bclose$/ and Deparse error: Can't locate object method "object_2svref" via package "B::SPECIAL" at /usr/local/lib/perl5/5.42.0/B/Deparse.pm line 5762. |
| 52 | 0 | 650 | if ($ref ne "SCALAR") |
| 60 | 650 | 0 | if ($mode eq 'w') { } |
| 0 | 0 | elsif ($mode eq 'r') { } | |
| 69 | 0 | 0 | if ($rscalar and ${$rscalar;}) |
| 87 | 0 | 0 | if ($mode ne "r") |
| 101 | 0 | 94 | if ($mode ne "w") |