blib/lib/IO/YAML.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 19 | 47 | 40.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
21 | 8 | 0 | 0 | scalar @args >= 2 and $args[1] =~ /^\+?[<>rwa]|>>|\d+$/ |
8 | 0 | 0 | scalar @args >= 2 and $args[1] =~ /^\+?[<>rwa]|>>|\d+$/ and $args[0] ne 'mode' | |
26 | 1 | 0 | 3 | scalar(@args) % 2 and $args[0] =~ /^\+?[<>rwa]|>>|\d+$/ |
86 | 0 | 9 | 0 | defined $path and defined $fh |
260 | 0 | 12 | 0 | $^V and $^V lt '5.8.0' |
line | l | !l | condition |
---|---|---|---|
149 | 7 | 0 | $self->handle || $self->open || die("Can't open: $!") |
152 | 19 | 0 | print $fh &$yaml_dumper($_), @terminator or die $! |
158 | 27 | 0 | $self->handle || $self->open || die("Can't open: $!") |
184 | 2 | 0 | $self->handle || $self->open || die("Can't open: $!") |
196 | 3 | 0 | $self->handle || $self->open || die("Can't open: $!") |
197 | 3 | 0 | fh_seek($fh, $pos, $whence) || die("Couldn't seek: $!") |
229 | 0 | 0 | $self->handle || $self->open || die("Can't open: $!") |
241 | 0 | 0 | $self->handle || $self->open || die("Can't open: $!") |
248 | 3 | 0 | $self->handle || $self->open || die("Can't open: $!") |
463 | 4 | 9 | eval "require $pkg; 1" or next |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
39 | 3 | 0 | 0 | ref $args[0] eq '' or UNIVERSAL::can($args[0], 'stringify') |
98 | 9 | 0 | 0 | $path ||= $self->path |
114 | 5 | 0 | 4 | $mode || $self->mode |
238 | 0 | 0 | 0 | $length == 0 or $length == $self->tell |