Branch Coverage

blib/lib/PSGRAPH.pm
Criterion Covered Total %
branch 23 466 4.9


line true false branch
44 1 0 if defined $Data
53 2 0 if defined $Graphic
62 1 0 if defined $LabelandColor
73 1 0 if (defined $self->getSubtype)
74 0 1 if ($graphic eq '2Dpie') { }
0 1 elsif ($graphic eq '2Dbar') { }
0 1 elsif ($graphic eq '2Dcolumn') { }
75 0 0 if (defined $subtype and $subtype == 1 or not defined $subtype) { }
0 0 elsif ($subtype == 2) { }
0 0 elsif ($subtype == 3) { }
0 0 elsif ($subtype == 31) { }
0 0 elsif ($subtype == 4) { }
0 0 elsif ($subtype == 41) { }
0 0 elsif ($subtype == 5) { }
0 0 elsif ($subtype == 6) { }
96 0 0 if (defined $subtype and $subtype == 1 or not defined $subtype) { }
102 0 0 if (defined $subtype and $subtype == 1 or not defined $subtype) { }
118 1 0 if defined $Subtype
127 1 0 if defined $hscale
136 1 0 if defined $vscale
145 0 0 if defined $initialdegree
154 0 0 if defined $gexport
163 0 0 if defined $legend
172 1 0 if defined $columnwidth
181 1 0 if defined $format
190 1 0 if defined $headertype
199 1 0 if defined $axistype
208 1 0 if defined $valuetype
217 1 0 if defined $valuetype
226 1 0 if defined $backgroundcolor
235 1 0 if defined $headercolor
244 0 0 if defined $explodeoffset
257 0 0 if (defined $self->getSubtype) { }
258 0 0 if (defined $self->getHscale) { }
259 0 0 if (defined $self->getVscale) { }
260 0 0 if (defined $self->getGexport) { }
261 0 0 if (defined $self->getLegend) { }
262 0 0 if (defined $self->getColumnwidth) { }
263 0 0 if (defined $self->getFormat) { }
264 0 0 if (defined $self->getHeadertype) { }
265 0 0 if (defined $self->getAxistype) { }
266 0 0 if (defined $self->getValuetype) { }
267 0 0 if (defined $self->getBackgroundcolor) { }
268 0 0 if (defined $self->getHeadercolor) { }
269 0 0 if (defined $self->getExplodeoffset) { }
270 0 0 if (defined $self->getInitialdegree) { }
274 0 1 if ($self->{'Graphic'} eq '2Dpie') { }
0 1 elsif ($self->{'Graphic'} eq '2Dcolumn') { }
0 1 elsif ($self->{'Graphic'} eq '2Dbar') { }
277 0 0 if (defined $self->{'Data'} and defined $self->{'LabelandColor'}) { }
278 0 0 unless (defined $self->{'Hscale'})
279 0 0 unless (defined $self->{'Vscale'})
280 0 0 unless (defined $self->{'Gexport'})
281 0 0 unless (defined $self->{'Valuetype'})
282 0 0 unless (defined $self->{'Explodeoffset'})
283 0 0 unless (defined $self->{'Initialdegree'})
284 0 0 if (defined $self->{'Subtype'} and $self->{'Subtype'} == 1 or not defined $self->{'Subtype'}) { }
0 0 elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 2) { }
0 0 elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 3 || $self->{'Subtype'} == 31 || $self->{'Subtype'} == 4) { }
0 0 elsif ($self->{'Subtype'} == 41) { }
0 0 elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 5) { }
0 0 elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 6 or not defined $self->{'Subtype'}) { }
289 0 0 unless (defined $self->{'Legend'})
291 0 0 if ($leg eq 'right' or $leg eq 'left' or $leg eq 'bottom') { }
292 0 0 if ($self->{'Subtype'} == 3) { }
0 0 elsif ($self->{'Subtype'} == 31) { }
0 0 elsif ($self->{'Subtype'} == 4) { }
318 0 0 unless open LC, $self->{'LabelandColor'}
323 0 0 if ($lc[5] != $currentsection)
325 0 0 if (length $sectionends > 0)
332 0 0 unless open TRANS, "<$transdata"
333 0 0 unless open TRANSPLUS, ">$transdata1"
347 0 0 if ($ii == $jj)
348 0 0 if (length $sectionmiddle > 0)
353 0 0 if ($thissection == $salength - 1)
372 0 0 if (defined $self->{'Data'} and defined $self->{'LabelandColor'}) { }
373 0 0 unless (defined $self->{'Hscale'})
374 0 0 unless (defined $self->{'Vscale'})
375 0 0 unless (defined $self->{'Gexport'})
376 0 0 unless (defined $self->{'Columnwidth'})
377 0 0 unless (defined $self->{'Format'})
378 0 0 unless (defined $self->{'Headertype'})
379 0 0 unless (defined $self->{'Valuetype'})
380 0 0 unless (defined $self->{'Axistype'})
381 0 0 unless (defined $self->{'Backgroundcolor'})
382 0 0 unless (defined $self->{'Headercolor'})
383 0 0 if (defined $self->{'Subtype'} and $self->{'Subtype'} == 1 or not defined $self->{'Subtype'})
390 0 0 if (defined $self->{'Data'} and defined $self->{'LabelandColor'}) { }
391 0 0 unless (defined $self->{'Hscale'})
392 0 0 unless (defined $self->{'Vscale'})
393 0 0 unless (defined $self->{'Gexport'})
394 0 0 unless (defined $self->{'Columnwidth'})
395 0 0 unless (defined $self->{'Format'})
396 0 0 unless (defined $self->{'Headertype'})
397 0 0 unless (defined $self->{'Valuetype'})
398 0 0 unless (defined $self->{'Valuecolor'})
399 0 0 unless (defined $self->{'Axistype'})
400 0 0 unless (defined $self->{'Backgroundcolor'})
401 0 0 unless (defined $self->{'Headercolor'})
402 0 0 if (defined $self->{'Subtype'} and $self->{'Subtype'} == 1 or not defined $self->{'Subtype'})
416 0 0 unless open DATA, './' . $data
417 0 0 unless open TRANS, ">$trans"
418 0 0 unless open DATA1, '+>data1'
432 0 0 if ($drow1 eq '') { }
447 0 0 if ($sum[$b] > $lvalue)
458 0 0 if ($c != $largest)
460 0 0 if ($d[$c] > 0)
461 0 0 if ($d[$c] < 3.6)
476 0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($labelx > $labelmax)
0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
480 0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if (100 * eval($thisslice) / 36 % 10 >= 5)
0 0 if ($percent1num == 0)
0 0 if ($wholepercent == 101)
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
483 0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($labelx > $labelmax)
0 0 if ($legend eq 'right') { }
0 0 elsif ($legend eq 'left') { }
0 0 elsif ($legend eq 'bottom') { }
0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 if ($legend eq 'right' or $legend eq 'left') { }
0 0 elsif ($legend eq 'bottom') { }
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($legend eq 'bottom') { }
0 0 elsif ($legend eq 'right') { }
0 0 elsif ($legend eq 'left') { }
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
486 0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($labelx > $labelmax)
0 0 if ($legend eq 'right') { }
0 0 elsif ($legend eq 'left') { }
0 0 elsif ($legend eq 'bottom') { }
0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 if ($legend eq 'right' or $legend eq 'left') { }
0 0 elsif ($legend eq 'bottom') { }
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if (100 * eval($thisslice) / 36 % 10 >= 5)
0 0 if ($percent1num == 0)
0 0 if ($wholepercent == 101)
0 0 if ($legend eq 'bottom') { }
0 0 elsif ($legend eq 'right') { }
0 0 elsif ($legend eq 'left') { }
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
489 0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($labelx > $labelmax)
0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if (100 * eval($thisslice) / 36 % 10 >= 5)
0 0 if ($percent1num == 0)
0 0 if ($wholepercent == 101)
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
492 0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($labelx > $labelmax)
0 0 if ($legend eq 'right') { }
0 0 elsif ($legend eq 'left') { }
0 0 elsif ($legend eq 'bottom') { }
0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 if ($legend eq 'right' or $legend eq 'left') { }
0 0 elsif ($legend eq 'bottom') { }
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if (100 * eval($thisslice) / 36 % 10 >= 5)
0 0 if ($percent1num == 0)
0 0 if ($wholepercent == 101)
0 0 if ($legend eq 'bottom') { }
0 0 elsif ($legend eq 'right') { }
0 0 elsif ($legend eq 'left') { }
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
495 0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($labelx > $labelmax)
0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($slicecounter < $sectionarray[$sectioncnt]) { }
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
499 0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($labelx > $labelmax)
0 0 unless open PIECHARTDATA, "<$data"
0 0 unless open PIE, ">$filewithdir"
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if (eval $thisslice > 0)
0 0 if (length $gexport > 0)
503 0 0 unless open COLCHARTDATA, "<$data"
0 0 unless open COL, ">$filewithdir"
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if ($cols[$i] > $maxval)
0 0 if ($maxval < 10) { }
0 0 elsif ($maxval < 100) { }
0 0 elsif ($maxval < 1000) { }
0 0 elsif ($maxval < 10000) { }
0 0 elsif ($maxval < 100000) { }
0 0 if ($maxval % $roundto == 0) { }
0 0 if (length $label > 15) { }
0 0 if (length $gexport > 0)
506 0 0 unless open BARCHARTDATA, "<$data"
0 0 if ($cols[$i] > $maxval)
0 0 if ($maxval < 10) { }
0 0 elsif ($maxval < 100) { }
0 0 elsif ($maxval < 1000) { }
0 0 elsif ($maxval < 10000) { }
0 0 elsif ($maxval < 100000) { }
0 0 if ($maxval % $roundto == 0) { }
0 0 unless open BAR, ">$filewithdir"
0 0 unless open LABELANDCOLOR, "<$labelandcolor"
0 0 if (length $label > 15) { }
0 0 if (length $gexport > 0)
508 0 0 if ($number < 1000) { }
0 0 if ($number < 10000) { }
0 0 if ($number < 100000) { }
0 0 if ($number < 1000000) { }
0 0 if ($format eq 'money')
0 0 if ($format eq 'money') { }
0 0 elsif (substr($format, 0, 1) eq 'd') { }
0 0 if ($scale == 1) { }
520 0 1 if $constname eq 'constant'
522 1 0 if ($error)