Branch Coverage

blib/lib/Config/Model/Backend/Xorg/Read.pm
Criterion Covered Total %
branch 60 72 83.3


line true false branch
43 112 0 if ($key eq 'section')
68 143 648 if ($key =~ /end(sub)?section/) { }
31 617 elsif ($key eq 'subsection') { }
80 793 584 if ($value =~ /^"([^"]+)"/) { }
584 0 elsif ($value =~ /^([^"\s]+)/) { }
109 66 74 unless defined $section_data_ref
117 0 10 if (keys %$xorg_conf)
128 6 130 if ($obj->config_class_name eq 'Xorg::ServerFlags') { }
14 116 elsif ($opt =~ /Core(Keyboard|Pointer)/) { }
2 114 elsif ($obj->config_class_name eq 'Xorg::InputDevice' and $opt eq 'AutoRepeat') { }
2 112 elsif ($obj->config_class_name eq 'Xorg::InputDevice' and $opt eq 'XkbOptions') { }
131 6 0 @args ? :
160 112 0 if ($opt_p_obj->has_element($opt)) { }
0 0 elsif ($opt_p_obj->instance->get_value_check('fetch_or_store')) { }
163 108 4 @args ? :
112 0 if defined $opt_obj
198 10 8 unless $mode_flags{lc $_}
14 36 if @m
220 8 12 if ($obj->config_class_name eq 'Xorg::Device') { }
225 10 2 if ($value =~ /^(\d+)$/) { }
238 8 4 if (@args)
242 3 5 if ($args[0] =~ /^\d+$/) { }
3 2 elsif ($args[0] eq 'Absolute') { }
0 2 elsif ($args[0] eq 'Relative') { }
276 0 3 if ($opt eq 'SendCoreEvents') { }
3 0 elsif ($opt =~ /Core(Keyboard|Pointer)/) { }
317 2 2 @g == 1 ? :
319 2 2 $global ? :
347 117 26 $obj_type =~ /list|hash/ ? :
354 117 26 if ($has_id)
357 1 116 unless (defined $id_rr)
374 826 226 unless defined $a2_r
379 193 145 if (defined $parse_line{$lc_name}) { }
31 114 elsif (ref $arg->[1] eq 'HASH') { }
397 45 97 if (%$section_data)
399 45 0 if (defined $parse_line{$lc_name}) { }