blib/lib/File/Stamped.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 12 | 24 | 50.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
15 | 1 | 5 | 0 | exists $args{'pattern'} and exists $args{'callback'} |
21 | 5 | 0 | 1 | defined $args{'symlink'} and not -l $args{'symlink'} |
5 | 1 | 0 | defined $args{'symlink'} and not -l $args{'symlink'} and -e _ | |
44 | 0 | 0 | 6 | defined $_[1] && UNIVERSAL::isa($_[1], 'File::Stamped') |
78 | 0 | 1 | 0 | defined $link and $link ne $fname |
95 | 0 | 0 | 0 | $fname eq *$self->{'fname'} and *$self->{'pid'} == $$ |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
18 | 5 | 1 | 0 | exists $args{'pattern'} or exists $args{'callback'} |
24 | 1 | 5 | 0 | delete $args{'callback'} || _make_callback_from_pattern(delete $args{'pattern'}) |