| line |
true |
false |
branch |
|
56
|
1 |
1201 |
@opts == 1 && ref $opts[0] eq 'HASH' ? : |
|
60
|
1200 |
2 |
unless defined $$options{'binmode'} |
|
64
|
2 |
1200 |
if $DEBUG and $$options{'binmode'} |
|
68
|
1199 |
3 |
if (defined $output) { } |
|
70
|
4 |
1195 |
unless (ref $outstream) |
|
72
|
4 |
0 |
if $outpath |
|
76
|
0 |
1199 |
if $error = &_output($outstream, \$output, $options) |
|
129
|
1 |
143 |
if defined $debug and not $debug =~ /^\d+$/ |
|
133
|
7 |
137 |
if (my $constants = $$config{'CONSTANTS'}) |
|
162
|
1 |
1199 |
if (($reftype = ref $where) eq 'CODE') { } |
|
|
0 |
1199 |
elsif ($reftype eq 'GLOB') { } |
|
|
1192 |
7 |
elsif ($reftype eq 'SCALAR') { } |
|
|
1 |
6 |
elsif ($reftype eq 'ARRAY') { } |
|
|
1 |
5 |
elsif (blessed $where and $where->can('print')) { } |
|
|
5 |
0 |
elsif (not $reftype) { } |
|
187
|
0 |
5 |
unless -d $dir |
|
188
|
0 |
5 |
if ($@) { } |
|
|
5 |
0 |
elsif (open FP, ">$where") { } |
|
195
|
2 |
3 |
if ($bm and $bm eq 1) { } |
|
|
0 |
3 |
elsif ($bm) { } |