blib/lib/Protocol/DBus/Marshal.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 10 | 13 | 76.9 |
line | l | !l | condition |
---|---|---|---|
41 | 78 | 24 | $buf_sr ||= \do { my $v = '' } |
112 | 1 | 0 | {b => 4, d => 8, g => 1, h => 4, i => 4, n => 2, o => 4, q => 2, s => 4, t => 8, u => 4, x => 8, y => 1}->{$sct} || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
81 | 47 | 45 | 0 | $pack ||= {g => 'C/a x', o => 'L/a x', s => 'L/a x'}->{$sct} |
111 | 1 | 1 | 1 | $compensate_align8 ||= 0 == index($sct, '{') |
112 | 2 | 1 | 0 | $compensate_align8 ||= ({b => 4, d => 8, g => 1, h => 4, i => 4, n => 2, o => 4, q => 2, s => 4, t => 8, u => 4, x => 8, y => 1}->{$sct} || 0) == 8 |