Branch Coverage

blib/lib/Net/Amazon/MechanicalTurk/DelimitedWriter.pm
Criterion Covered Total %
branch 22 36 61.1


line true false branch
35 2 0 if (not defined $self->output) { }
36 0 2 unless (defined $self->file)
39 2 0 unless ($self->lazy)
44 0 0 if $self->autoflush
51 2 0 if ($self->autoclose) { }
0 0 elsif ($self->output) { }
61 2 2 if ($self->output)
69 14 2 if (defined $self->output) { }
73 0 2 $self->append ? :
75 0 2 unless ($out)
78 2 0 if ($self->utf8)
82 0 2 if $@
84 0 2 if $self->autoflush
93 4 10 $#_ == 0 && UNIVERSAL::isa($_[0], 'ARRAY') ? :
96 12 2 if ($rowsWritten > 0)
101 20 12 if ($i > 0)
112 0 32 unless (defined $cell)
115 7 25 if (index($cell, $fs) >= 0 or $cell =~ /[\n"]/s) { }