Condition Coverage

blib/lib/Script/State.pm
Criterion Covered Total %
condition 1 6 16.6


and 3 conditions

line !l l&&!r l&&r condition
28 1 0 0 $DATAFILE and $VAR_REF

or 3 conditions

line l !l&&r !l&&!r condition
45 0 0 0 delete $args{-'datafile'} || do { require File::Spec; my($vol, $dirs, $file) = 'File::Spec'->splitpath($0); 'File::Spec'->catpath($vol, $dirs, ".$file.pl") }