line |
true |
false |
branch |
211
|
0 |
29 |
if (@_) |
231
|
628 |
226 |
if (@_) |
251
|
12 |
293 |
unless defined $value |
267
|
4 |
744 |
if ($value =~ s/$transformer->[0]/my $value = $transformer->[2]->($self);
defined $value ? $value : "__UNDEF__";/eu) |
270
|
4 |
0 |
defined $value ? : |
275
|
0 |
4 |
$value eq '__UNDEF__' ? : |
370
|
0 |
12 |
if ($data) |
371
|
0 |
0 |
if (ref $data eq 'HASH') { } |
|
0 |
0 |
elsif (ref $data eq 'ARRAY' and scalar @{$data;} > 0 and ref $data->[0] eq 'HASH') { } |
389
|
0 |
12 |
$data ? : |
|
0 |
12 |
$data ? : |
|
0 |
12 |
$columns ? : |
406
|
0 |
12 |
unless ($result->result eq "passing") |
421
|
192 |
307 |
$self->verb eq 'before' || $self->verb eq 'after' ? : |
432
|
226 |
0 |
if ($self->verb ne "transform" and $self->has_transformers) |
453
|
7 |
22 |
if ($self->verb ne "transform" and ref $transformed_data and $self->has_transformers) |
461
|
2 |
5 |
if (my $transformer = &first(sub {
$table_text =~ /$_->[0]/u;
}
, @{$self->transformers;})) |