Condition Coverage

blib/lib/App/Mowyw.pm
Criterion Covered Total %
condition 56 88 63.6


and 3 conditions

line !l l&&!r l&&r condition
165 0 233 0 $tokens and $tokens->[0]
41 192 0 $tokens and $tokens->[0] and $tokens->[0][0]
0 192 0 $tokens and $tokens->[0] and $tokens->[0][0] and $allowed_tokens{$tokens->[0][0]} || $a{$tokens->[0][0]}
247 7 8 5 $meta->{'ITEMS'}[0] and $meta->{'ITEMS'}[0] eq $key
293 1 2 0 $ds and &blessed($ds)
344 7 1 1 $tokens->[0][0] eq 'TAG_START' and $tokens->[1][0] eq 'KEYWORD'
8 0 1 $tokens->[0][0] eq 'TAG_START' and $tokens->[1][0] eq 'KEYWORD' and $tokens->[1][1] eq 'endverbatim'
1 0 1 $tokens->[0][0] eq 'TAG_START' and $tokens->[1][0] eq 'KEYWORD' and $tokens->[1][1] eq 'endverbatim' and $tokens->[2][1] =~ /\s*\Q$key\E\s*/
0 0 1 $tokens->[0][0] eq 'TAG_START' and $tokens->[1][0] eq 'KEYWORD' and $tokens->[1][1] eq 'endverbatim' and $tokens->[2][1] =~ /\s*\Q$key\E\s*/ and $tokens->[3][0] eq 'TAG_END'
375 0 1 16 defined $var && ref $var
408 2 28 31 @$tokens and $tokens->[0][0] ne $expected_token
509 12 0 1 defined $options{'escape'} and lc $options{'escape'} eq 'html'
540 2 0 2 $tokens->[0][0] eq 'TAG_START' && $tokens->[1][1] eq 'endsyntax' && $tokens->[2][0] eq 'TAG_END'
0 2 2 $tokens->[0] and not $tokens->[0][0] eq 'TAG_START' && $tokens->[1][1] eq 'endsyntax' && $tokens->[2][0] eq 'TAG_END'
621 41 20 116 @$tokens and $tokens->[0][0] ne 'TAG_END'
61 20 96 @$tokens and $tokens->[0][0] ne 'TAG_END' and $tokens->[0][0] ne 'BRACES_END'
644 60 7 8 $meta->{'PARSE_UPTO'} and $meta->{'PARSE_UPTO'} eq $key
756 4 0 0 $config{'make_behaviour'} and -e $new_fn
4 0 0 $config{'make_behaviour'} and -e $new_fn and (stat $fn)[9] < (stat $new_fn)[9]

or 2 conditions

line l !l condition
854 0 0 eval { do { qr/$v/ } } || die("Invalid regex '${v}' in config: $@")
859 0 0 eval { do { qr/$v/ } } || die("Invalid regex '${v}' in config: $@")

or 3 conditions

line l !l&&r !l&&!r condition
90 1 1 4 $f eq '..' or $f eq '.'
2 0 4 $f eq '..' or $f eq '.' or $f eq '.svn'
1 0 4 $f eq '..' or $f eq '.' or $f eq '.svn' or $f eq '.git'
0 0 4 $f eq '..' or $f eq '.' or $f eq '.svn' or $f eq '.git' or $f =~ /(?:~|\.swp)$/
165 56 0 136 $allowed_tokens{$tokens->[0][0]} || $a{$tokens->[0][0]}
285 3 1 3 not defined $datasource or lc $in ne 'in'
375 1 0 16 not defined $var && ref $var or &reftype($var) ne 'HASH'
388 2 0 0 $meta->{'NO_VAR_WARN'} or $config{'quiet'}
588 298 0 0 not defined $e_val or $e_val eq $tokens->[0][1]