| line |
true |
false |
branch |
|
262
|
0 |
18985 |
unless my $type = ref $self |
|
267
|
0 |
18985 |
unless (exists $$self{'_permitted'}{$name}) |
|
271
|
328 |
18657 |
if (@_) { } |
|
292
|
0 |
31 |
unless defined $value |
|
306
|
0 |
290 |
unless defined $pn |
|
319
|
30 |
260 |
if $extension ne '' |
|
324
|
26 |
264 |
if $extension ne '' |
|
326
|
56 |
234 |
if (defined $retval) |
|
343
|
0 |
13 |
unless opendir $dh, $dn |
|
350
|
26 |
234 |
if defined $self->_determine_xl_vers($pn) |
|
364
|
0 |
30 |
unless defined $fn |
|
370
|
30 |
0 |
if (-f $pn) { } |
|
382
|
13 |
17 |
if ($self->_xl_vers eq 'xl2007') { } |
|
385
|
0 |
13 |
unless defined $parser |
|
393
|
0 |
17 |
unless defined $self->workbook |
|
404
|
7 |
0 |
if (@_) { } |
|
412
|
10 |
4 |
if ($_ =~ /$re/) |
|
414
|
6 |
4 |
unless $matches++ |
|
418
|
1 |
6 |
unless (defined $wb) |
|
423
|
4 |
2 |
if $matches > 1 |
|
433
|
10 |
100 |
$id == $self->title_row ? : |
|
443
|
36 |
0 |
if (@_) |
|
444
|
0 |
36 |
if (@_) |
|
446
|
0 |
36 |
unless defined $self->sheet_name and defined $self->title_row |
|
459
|
4 |
32 |
if $self->title_row < $minr |
|
471
|
110 |
258 |
if $self->rowid |
|
478
|
3552 |
32 |
if (defined $cell) { } |
|
479
|
1526 |
2026 |
$self->trim ? : |
|
484
|
440 |
3144 |
if $self->force_null |
|
496
|
346 |
3348 |
if ($subr == $self->title_row) { } |
|
499
|
764 |
2584 |
if defined $value and length $value > $widths[$subc] |
|
510
|
36 |
332 |
if ($subr == $self->title_row) { } |
|
528
|
0 |
4 |
unless defined $colid |
|
534
|
0 |
4 |
if $colid < 0 |
|
537
|
2 |
2 |
unless $colid < scalar @{$self->titles;} |
|
546
|
0 |
44 |
unless defined $title |
|
554
|
30 |
264 |
if ($self->titles->[$tsub] =~ /$title/) |
|
568
|
1526 |
0 |
if (defined $s_value) |
|
584
|
436 |
4 |
defined $s_value ? : |
|
|
440 |
0 |
defined $s_null ? : |
|
589
|
436 |
4 |
if (defined $s_value) { } |
|
590
|
2 |
434 |
if $s_value eq '' |
|
616
|
20 |
240 |
exists $data{$column} ? : |
|
634
|
0 |
2 |
unless @_ > 0 |
|
645
|
0 |
2 |
unless @_ > 0 |
|
656
|
0 |
14 |
unless defined $clause |
|
663
|
6 |
8 |
if $self->rowid |
|
671
|
28 |
12 |
if (defined $id) { } |
|
682
|
6 |
8 |
$self->rowid ? : |
|
684
|
10 |
4 |
unless (scalar @columns == $f_no_columns) |
|
696
|
100 |
0 |
if scalar @wanted |