| blib/lib/SQL/Load.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 28 | 71.4 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 0 | 4 | unless $path |
| 19 | 0 | 4 | unless -d $path |
| 35 | 18 | 9 | if ($file_name =~ m[^([\w\-/\.]+)\#([\w\-]+)$]) { } |
| 42 | 27 | 0 | if ($file_name and $file_name =~ m[^[\w\-/]+$]) |
| 44 | 25 | 2 | unless ($reload) |
| 49 | 19 | 6 | if ($key) |
| 50 | 18 | 1 | $name ? : |
| 68 | 0 | 8 | $name ? : |
| 90 | 8 | 8 | if (-e $is_file) |
| 96 | 0 | 8 | if $file |
| 99 | 8 | 0 | if $file |
| 109 | 0 | 8 | unless open FH, "<", $file |
| 123 | 19 | 6 | if exists $self->{'_keys'}{$name} |
| 140 | 19 | 0 | if exists $self->{'_data'}{$key}{'content'} |