Branch Coverage

blib/lib/Perinci/AccessUtil.pm
Criterion Covered Total %
branch 28 30 93.3


line true false branch
22 9 2 if ($res->[3]{'riap.v'} >= 1.2)
25 1 8 unless $encode // 1
26 1 7 if $res->[3]{'riap.result_encoding'}
27 2 5 if ($nmeta)
29 1 1 unless $nmeta->{'result'}{'schema'} and $nmeta->{'result'}{'schema'}[0] eq 'buf'
31 2 2 unless defined $res->[2] and not ref $res->[2] and $res->[2] =~ /[^\x20-\x7f]/
44 1 5 unless $ver == 1.1 or $ver == 1.2
48 3 2 if ($ver >= 1.2)
51 0 5 unless $k =~ /\Ariap\./
53 2 3 if ($k eq 'riap.v') { }
2 1 elsif ($k eq 'riap.result_encoding') { }
55 1 1 unless $val eq 'base64'
74 1 1 if ($v >= 1.2)
75 1 0 if ($req->{'args'})
78 1 1 unless /\A(.+):base64\z/