blib/lib/Text/CSV/Encoded/Coder/Encode.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 10 | 18 | 55.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
33 | 0 | 17 | 27 | $self->{'automatic_UTF8'} and $encoding =~ /utf-?8/i |
44 | 0 | 16 | 5 | $self->{'automatic_UTF8'} and $encoding =~ /utf-?8/i |
line | l | !l | condition |
---|---|---|---|
48 | 16 | 0 | $self->find_encoding($encoding) || (return) |
57 | 12 | 0 | $self->find_encoding($encoding) || (return) |
66 | 74 | 0 | $_[0] or 'utf8' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
66 | 11 | 0 | 0 | &Encode::find_encoding(scalar($_[0] || 'utf8')) || Carp::croak("Not found such an encoding name '$_[0]'") |
63 | 11 | 0 | $EncoderCache{$_[0] or 'utf8'} ||= &Encode::find_encoding(scalar($_[0] || 'utf8')) || Carp::croak("Not found such an encoding name '$_[0]'") |