Branch Coverage

blib/lib/WWW/xkcd.pm
Criterion Covered Total %
branch 22 24 91.6


line true false branch
29 7 6 defined $comic ? :
31 6 7 if ($cb)
33 0 6 unless $can_async
50 1 6 unless $result->{'success'}
61 1 1 if ($callback and ref $callback)
81 3 4 if ($cb)
102 1 3 unless $result->{'success'}
115 6 14 if (@_ == 2) { }
11 3 elsif (@_ == 1) { }
118 3 8 if (ref $_[0]) { }
133 0 14 unless defined $json
135 1 13 unless (eval { do { $data = &decode_json($json); 1 } })