Branch Coverage

blib/lib/Siebel/Srvrmgr/ListParser.pm
Criterion Covered Total %
branch 33 48 68.7


line true false branch
309 0 12983 unless 'Log::Log4perl'->init_once(\$log_cfg)
313 12933 50 if (defined $line) { }
318 12913 20 if (scalar @{$buffer_ref;} >= 1) { }
327 12913 0 if ($last_buffer->get_type eq $type) { }
329 12514 399 if ($line ne '') { }
343 0 0 if ($logger->is_fatal)
381 0 135 unless 'Log::Log4perl'->init_once(\$log_cfg)
385 135 0 if ('Siebel::Srvrmgr::ListParser::OutputFactory'->can_create($type)) { }
396 0 135 if ($logger->is_debug)
478 78 45 if ($self->has_tree) { }
516 0 50 if (defined $buffer) { }
528 0 0 if ($output->isa('Siebel::Srvrmgr::ListParser::Output::Enterprise')) { }
557 12 123 if ($output->isa('Siebel::Srvrmgr::ListParser::Output::Enterprise')) { }
605 0 50 unless defined $data_ref and ref $data_ref eq 'ARRAY' and scalar @{$data_ref;} > 0
607 4 46 if (string_has_bom($$data_ref[0]))
615 50 0 unless $self->get_fsa->curr_state
625 286 12848 if (defined $state) { }
640 123 163 if ($self->get_fsa->prev_state->name eq 'command_submission')
648 151 12 if ($state->notes('is_cmd_changed'))
650 0 151 if $logger->is_debug
660 12 0 if ($state->notes('create_greetings'))
671 135 151 if ($state->notes('is_data_wanted'))
673 0 135 if $logger->is_debug
700 2 48 unless $found_prompt