Branch Coverage

blib/lib/DBIx/Raw.pm
Criterion Covered Total %
branch 90 124 72.5


line true false branch
422 0 282 unless $self->sth($self->dbh->prepare($params->{'query'}))
425 157 125 if ($params->{'encrypt'})
431 224 58 if (not defined wantarray) { }
11 47 elsif (wantarray) { }
432 0 224 unless $self->sth->finish
441 47 0 if ($params->{'query'} =~ /SELECT\s+(.*?)\s+FROM/i)
446 37 10 if ($num_commas > 0 or $num_stars > 0)
450 0 58 if ($params->{'query'} =~ /^(\n*?| *?|\r*?)UPDATE /is) { }
58 0 elsif ($params->{'query'} =~ /SELECT /sig or $params->{'query'} =~ /SHOW /sig) { }
455 58 0 unless ($params->{'query'} =~ /INSERT INTO (.*?)SELECT /sig)
456 37 21 if ($return_type eq 'hash') { }
457 1 36 unless $params->{'href'} = $self->sth->fetchrow_hashref
459 8 28 if ($params->{'decrypt'})
466 2 19 unless @return_values = $self->sth->fetchrow_array
468 5 14 if ($params->{'decrypt'})
476 0 55 unless $self->sth->finish
478 10 45 if ($return_type eq 'array') { }
506 2 2 if ($params->{'decrypt'}) { }
544 1 2 if ($params->{'decrypt'}) { }
621 1 2 if ($params->{'decrypt'}) { }
685 0 3 unless $params->{'query'} and $params->{'key'} and $params->{'val'}
691 1 2 if ($params->{'decrypt'}) { }
758 0 3 unless $params->{'query'} and $params->{'key'}
764 1 2 if ($params->{'decrypt'}) { }
803 1 1 if ($params->{'decrypt'}) { }
864 0 3 unless $params->{'query'} and $params->{'key'} and $params->{'val'}
870 1 2 if ($params->{'decrypt'}) { }
966 0 0 unless $params->{'href'} and $params->{'table'}
974 0 0 if (ref $val eq 'SCALAR') { }
978 0 0 if ($params->{'encrypt'} and &first(sub { $_ eq $key; } , @{$$params{'encrypt'};}))
995 0 0 if ($params->{'encrypt'} and @encrypt)
1112 0 17 unless $params->{'href'} and $params->{'table'}
1119 3 48 if (ref $val eq 'SCALAR') { }
1124 24 24 if (defined $params->{'encrypt'} and $params->{'encrypt'} eq '*' or $params->{'encrypt'} and &first(sub { $_ eq $key; } , @{$$params{'encrypt'};}))
1137 11 6 unless $params->{'vals'}
1139 10 7 if ($params->{'where'})
1144 5 12 if ($params->{'id'}) { }
6 6 elsif ($params->{'pk'}) { }
1145 3 2 if ($where eq '') { }
1157 2 4 if ($where eq '') { }
1170 8 9 if ($params->{'encrypt'} and @encrypt)
1177 17 0 unless defined wantarray
1178 0 0 wantarray ? :
1233 0 1 unless $params->{'columns'} and $params->{'table'} and $params->{'rows'}
1373 278 43 if ($self->keys->{$_[0]}) { }
1387 0 321 unless $self->sth($self->dbh->prepare($params->{'query'}))
1389 227 94 if ($params->{'vals'}) { }
1390 0 227 unless $self->sth->execute(@{$$params{'vals'};})
1393 0 94 unless $self->sth->execute
1405 8 23 if ($params->{'decrypt'} eq '*') { }
1406 6 2 if ($params->{'href'}) { }
1417 24 7 if ($params->{'href'}) { }
1419 47 0 if $params->{'href'}{$key}
1424 12 0 if $params->{'return_values'}[$index]
1433 4 161 if ($params->{'encrypt'} eq '*') { }
1436 4 0 if ($params->{'query'} =~ /WHERE\s+(.*)/i)
1454 0 80 if ($self->use_old_crypt)
1464 0 63 if ($self->use_old_crypt)
1475 137 3 if ($self->conf)
1478 0 68 if $self->conf eq $self->prev_conf and $self->dsn and $self->user and $self->password
1485 412 0 if ($self->can($attribute))
1498 0 140 unless defined $self->dsn and defined $self->user and defined $self->password or defined $self->dbh