line |
true |
false |
branch |
120
|
0 |
0 |
if (@_ == 1) { } |
129
|
0 |
0 |
unless defined $p{'source'} |
131
|
0 |
0 |
if (ref $p{'source'}) { } |
133
|
0 |
0 |
if (ref $p{'source'} eq 'SCALAR') { } |
|
0 |
0 |
elsif (ref $p{'source'} eq 'ARRAY') { } |
|
0 |
0 |
elsif (ref $p{'source'} eq 'GLOB' or &Scalar::Util::blessed($p{'source'}) and $p{'source'}->isa('IO::Seekable')) { } |
151
|
0 |
0 |
unless $p{'fh'} = 'IO::File'->new($p{'source'}) |
158
|
0 |
0 |
unless $MAP{$type} |
159
|
0 |
0 |
unless eval "require $MAP{$type};" |
172
|
0 |
0 |
unless $self->{'fields'} |
173
|
0 |
0 |
wantarray ? : |