Branch Coverage

blib/lib/JMX/Jmx4Perl/Request.pm
Criterion Covered Total %
branch 34 72 47.2


line true false branch
232 0 20 if (ref $type eq 'HASH')
236 0 20 unless $$TYPES{$type}
239 20 0 unless ($self)
240 0 20 if (ref $_[0] eq 'HASH') { }
249 2 18 if (ref $opts eq 'HASH')
252 2 0 if ($$self{'method'})
257 20 0 if ($type eq 'read') { }
0 0 elsif ($type eq 'write') { }
0 0 elsif ($type eq 'exec') { }
0 0 elsif ($type eq 'list') { }
0 0 elsif ($type eq 'search') { }
0 0 elsif ($type eq 'version') { }
262 2 18 if (ref $$self{'attribute'} eq 'ARRAY')
264 1 1 if (defined $method and $method eq 'GET')
266 1 0 if ref $$self{'attribute'} eq 'ARRAY'
311 3 5 if (defined $value)
312 0 3 if length $value and not uc($value) =~ /^(POST|GET)$/i
315 6 2 defined $$self{'method'} ? :
328 0 16 unless $mbean
330 4 12 if $domain =~ /[*?]/
331 3 9 if $rest =~ /\*$/
338 6 6 if ($rest =~ /^"/) { }
342 1 5 if $value =~ /(?
346 3 3 if $value =~ /[\*\?]/
368 19 0 if ($$self{'type'} eq 'read' or $$self{'type'} eq 'write')
369 0 19 unless $$self{'mbean'}
370 0 19 if not $$self{'attribute'} and $$self{'path'}
372 0 19 if ($$self{'type'} eq 'write')
373 0 0 unless defined $$self{'value'}
375 0 19 if ($$self{'type'} eq 'exec')
376 0 0 unless $$self{'mbean'}
377 0 0 unless $$self{'operation'}
384 0 0 $$self{'type'} ? :
388 0 0 if defined $$self{$k}
392 0 0 if defined $$self{$k}
394 0 0 if keys %config