| line |
true |
false |
branch |
|
88
|
104 |
703 |
if (my $sub = $class->can("configure_$name")) { } |
|
|
0 |
703 |
elsif (not exists $$fields{"cf_$name"}) { } |
|
96
|
69 |
0 |
wantarray ? : |
|
101
|
69 |
0 |
if (not defined $_[0]) { } |
|
|
0 |
0 |
elsif ($prop->{'cf_encoding'}) { } |
|
102
|
0 |
69 |
$prop->{'cf_encoding'} ? : |
|
105
|
0 |
69 |
unless open $_[0], ">$enc", $prop->{'cf_buffer'} |
|
123
|
0 |
0 |
$prop->{'cf_encoding'} ? : |
|
129
|
0 |
21 |
if @_ < 2 |
|
130
|
0 |
21 |
if @_ > 3 |
|
134
|
0 |
21 |
unless (exists $$fields{"cf_$name"}) |
|
145
|
0 |
108 |
unless (defined $name) |
|
149
|
47 |
61 |
if (my $sub = $glob->can("configure_$name")) { } |
|
|
0 |
61 |
elsif (not exists $$fields{"cf_$name"}) { } |
|
157
|
0 |
108 |
if (wantarray) { } |
|
172
|
0 |
0 |
if /^cf_/ |
|
180
|
0 |
0 |
if (my $buf = $prop->{'cf_buffer'}) |
|
184
|
0 |
0 |
if @_ |
|
203
|
0 |
4 |
if (my $yatt = $prop->{'cf_yatt'}) { } |
|
|
0 |
4 |
elsif (my $system = $prop->{'cf_system'}) { } |
|
208
|
2 |
2 |
if @err and ref $err[0] eq 'HASH' |
|
216
|
0 |
0 |
if (my YATT::Lite::Connection::Env $env = $prop->{'cf_env'}) { } |
|
|
0 |
0 |
elsif (fileno STDERR) { } |
|
240
|
0 |
4 |
unless $fh or $logger |
|
242
|
1 |
3 |
if (not defined $_[0]) { } |
|
|
1 |
2 |
elsif (ref $_[0]) { } |
|
|
1 |
1 |
elsif ($_[0] =~ /^[\w\.\-]+$/) { } |
|
255
|
4 |
0 |
if ($fh) { } |
|
288
|
1 |
68 |
if (my $backend = delete $prop->{'cf_backend'}) |
|
289
|
0 |
1 |
if ($prop->{'cf_debug'} and my $errfh = $glob->error_fh) |
|
295
|
0 |
69 |
if ($prop->{'cf_debug'} and my $errfh = $glob->error_fh) |
|
306
|
0 |
0 |
if ($parent and my $sub = $parent->can('header_was_sent')) |
|
314
|
90 |
66 |
if $prop->{'header_was_sent'}++ |
|
318
|
27 |
39 |
unless ($prop->{'cf_noheader'}) |
|
327
|
48 |
21 |
if $prop->{'cf_yatt'} |
|
328
|
59 |
10 |
if $prop->{'cf_system'} |
|
329
|
0 |
69 |
if $prop->{'cookies_out'} |
|
335
|
14 |
55 |
if ($prop->{'cf_parent_fh'}) |
|
358
|
0 |
0 |
if (defined $env->{'HTTP_COOKIE'}) { } |
|
369
|
0 |
0 |
if (@_ == 1 and ref $_[0]) { } |
|
388
|
0 |
0 |
unless $prop->{'cookies_out'} |
|
407
|
1 |
26 |
$_ ? : |
|
415
|
27 |
0 |
if ($ct =~ m[^text/] and not $ct =~ /;\s*charset/) |
|
447
|
30 |
2 |
unless my $headers = $prop->{'headers'} |
|
478
|
0 |
0 |
if (not @_) { } |
|
|
0 |
0 |
elsif (@_ == 1) { } |
|
509
|
0 |
1 |
unless @_ |
|
512
|
0 |
1 |
if (not defined $method) { } |
|
|
0 |
1 |
elsif (not $prop->{'cf_backend'}) { } |
|
|
0 |
1 |
elsif (not my $sub = $prop->{'cf_backend'}->can($method)) { } |