Branch Coverage

blib/lib/CPS/Functional.pm
Criterion Covered Total %
branch 24 38 63.1


line true false branch
33 5 0 if (eval { do { require Sub::Name } }) { }
106 0 1 unless ref $items eq 'ARRAY'
107 0 1 unless ref $body eq 'CODE'
115 1 3 unless $idx < scalar @$items
144 0 1 unless ref $items eq 'ARRAY'
145 0 1 unless ref $body eq 'CODE'
153 1 4 unless $idx < scalar @$items
157 2 2 if $_[0]
198 0 1 unless ref $items eq 'ARRAY'
199 0 1 unless ref $body eq 'CODE'
201 0 1 if @$items == 0
202 0 1 if @$items == 1
210 1 2 unless $idx < scalar @$items
244 0 1 unless ref $items eq 'ARRAY'
245 0 1 unless ref $body eq 'CODE'
247 0 1 if @$items == 0
248 0 1 if @$items == 1
256 1 2 if $idx < 0
294 0 1 unless ref $body eq 'CODE'