| line |
true |
false |
branch |
|
272
|
0 |
18959 |
unless my $type = ref $self |
|
277
|
0 |
18959 |
unless (exists $$self{'_permitted'}{$name}) |
|
281
|
328 |
18631 |
if (@_) { } |
|
302
|
0 |
31 |
unless defined $value |
|
316
|
0 |
264 |
unless defined $pn |
|
329
|
30 |
234 |
if $extension ne '' |
|
334
|
26 |
238 |
if $extension ne '' |
|
336
|
56 |
208 |
if (defined $retval) |
|
353
|
0 |
13 |
unless opendir $dh, $dn |
|
360
|
26 |
208 |
if defined $self->_determine_xl_vers($pn) |
|
374
|
0 |
30 |
unless defined $fn |
|
380
|
30 |
0 |
if (-f $pn) { } |
|
392
|
13 |
17 |
if ($self->_xl_vers eq 'xl2007') { } |
|
395
|
0 |
13 |
unless defined $parser |
|
403
|
0 |
17 |
unless defined $self->workbook |
|
414
|
7 |
0 |
if (@_) { } |
|
422
|
10 |
4 |
if ($_ =~ /$re/) |
|
424
|
6 |
4 |
unless $matches++ |
|
428
|
1 |
6 |
unless (defined $wb) |
|
433
|
4 |
2 |
if $matches > 1 |
|
443
|
10 |
100 |
$id == $self->title_row ? : |
|
453
|
36 |
0 |
if (@_) |
|
454
|
0 |
36 |
if (@_) |
|
456
|
0 |
36 |
unless defined $self->sheet_name and defined $self->title_row |
|
469
|
4 |
32 |
if $self->title_row < $minr |
|
481
|
110 |
258 |
if $self->rowid |
|
488
|
3552 |
32 |
if (defined $cell) { } |
|
489
|
1526 |
2026 |
$self->trim ? : |
|
494
|
440 |
3144 |
if $self->force_null |
|
506
|
346 |
3348 |
if ($subr == $self->title_row) { } |
|
509
|
764 |
2584 |
if defined $value and length $value > $widths[$subc] |
|
520
|
36 |
332 |
if ($subr == $self->title_row) { } |
|
538
|
0 |
4 |
unless defined $colid |
|
544
|
0 |
4 |
if $colid < 0 |
|
547
|
2 |
2 |
unless $colid < scalar @{$self->titles;} |
|
556
|
0 |
44 |
unless defined $title |
|
564
|
30 |
264 |
if ($self->titles->[$tsub] =~ /$title/) |
|
578
|
1526 |
0 |
if (defined $s_value) |
|
594
|
436 |
4 |
defined $s_value ? : |
|
|
440 |
0 |
defined $s_null ? : |
|
599
|
436 |
4 |
if (defined $s_value) { } |
|
600
|
2 |
434 |
if $s_value eq '' |
|
626
|
20 |
240 |
exists $data{$column} ? : |
|
644
|
0 |
2 |
unless defined @_ |
|
655
|
0 |
2 |
unless defined @_ |
|
666
|
0 |
14 |
unless defined $clause |
|
673
|
6 |
8 |
if $self->rowid |
|
681
|
28 |
12 |
if (defined $id) { } |
|
692
|
6 |
8 |
$self->rowid ? : |
|
694
|
10 |
4 |
unless (scalar @columns == $f_no_columns) |
|
706
|
100 |
0 |
if scalar @wanted |