Branch Coverage

blib/lib/PDF/Tk.pm
Criterion Covered Total %
branch 0 42 0.0


line true false branch
15 0 0 if $$self{'file'} and $$self{'document'}
18 0 0 if $$self{'file'}
19 0 0 unless -x $$self{'pdftk'}
27 0 0 if (ref $$self{'file'} eq 'ARRAY') { }
30 0 0 if (ref $file eq 'SCALAR')
39 0 0 unless $$self{'document'}
42 0 0 unless $$self{'document'}
51 0 0 if (ref $input eq 'SCALAR' and ref $output eq 'SCALAR') { }
0 0 elsif (ref $input eq 'SCALAR') { }
0 0 elsif (ref $output eq 'SCALAR') { }
53 0 0 unless my $pid = open2($rdfh, $wrfh, $$self{'pdftk'}, '-', @args, 'output', '-')
62 0 0 unless open $fh, '|-', $$self{'pdftk'}, '-', @args, 'output', $output
68 0 0 ref $input eq 'ARRAY' ? :
0 0 unless open $fh, '-|', $$self{'pdftk'}, ref $input eq 'ARRAY' ? @$input : $input, @args, 'output', '-'
73 0 0 ref $input eq 'ARRAY' ? :
0 0 unless system($$self{'pdftk'}, ref $input eq 'ARRAY' ? @$input : $input, @args, 'output', $output) == 0
80 0 0 if ($doc) { }
99 0 0 wantarray ? :
118 0 0 unless ($$self{'documentinfo'})
125 0 0 if ($key eq 'InfoKey')
134 0 0 if $arg