Branch Coverage

blib/lib/PCL/Simple.pm
Criterion Covered Total %
branch 37 50 74.0


line true false branch
84 4 0 if ($#_) { }
0 0 elsif (ref $_[0] eq 'HASH') { }
105 0 14 unless grep /^$key$/, keys %{$ok;}
106 11 3 if (ref $$ok{$key} eq 'Regexp') { }
107 0 11 unless $$args{$key} =~ /$$ok{$key}/
109 0 3 unless grep /^$$args{$key}$/, @{$$ok{$key};}
113 0 4 unless $$args{-'w'}
114 0 4 unless $$args{-'lpp'}
116 3 1 unless defined $$args{-'ms'}
117 2 2 unless defined $$args{-'o'}
118 2 2 unless defined $$args{-'s'}
119 3 1 unless defined $$args{-'c'}
269 2 2 if ($$args{-'o'} eq 'landscape') { }
2 0 elsif ($$args{-'o'} eq 'portrait') { }
277 4 0 defined $page{$$args{-'ms'}}{'page_size_code'} ? :
281 2 2 $orientation_code == 0 ? :
295 2 2 $orientation_code == 0 ? :
300 2 2 $orientation_code == 0 ? :
304 2 2 $orientation_code == 1 ? :
313 2 2 $orientation_code == 1 ? :
319 0 4 defined $$args{-'msrc'} ? :
4 0 $num_left_margin_chars ? :
4 0 $num_right_margin_position ? :
2 2 $num_top_margin_lines ? :
2 2 $num_bottom_margin_position ? :