blib/lib/IO/File/Cached.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 16 | 0.0 |
line | true | false | branch |
---|---|---|---|
86 | 0 | 0 | exists $params{'filename'} ? : |
87 | 0 | 0 | exists $params{'cache'} ? : |
90 | 0 | 0 | if ($filename eq '-') { } |
94 | 0 | 0 | if (defined $cache) |
98 | 0 | 0 | unless (defined $data) |
99 | 0 | 0 | unless my $fh = 'IO::File'->new($filename) |
103 | 0 | 0 | unless $fh->close |
106 | 0 | 0 | if (defined $cache) |