| blib/lib/SQL/Load.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 28 | 71.4 |
| line | true | false | branch |
|---|---|---|---|
| 18 | 0 | 5 | unless $path |
| 19 | 0 | 5 | unless -d $path |
| 36 | 18 | 10 | if ($file_name =~ m[^([\w\-/\.]+)\#([\w\-]+)$]) { } |
| 43 | 28 | 0 | if ($file_name and $file_name =~ m[^[\w\-/]+$]) |
| 45 | 26 | 2 | unless ($reload) |
| 50 | 19 | 7 | if ($key) |
| 51 | 18 | 1 | $name ? : |
| 71 | 0 | 9 | $name ? : |
| 91 | 9 | 9 | if (-e $is_file) |
| 97 | 0 | 9 | if $file |
| 100 | 9 | 0 | if $file |
| 110 | 0 | 9 | unless open FH, "<", $file |
| 124 | 19 | 7 | if exists $self->{'_keys'}{$name} |
| 141 | 19 | 0 | if exists $self->{'_data'}{$key}{'content'} |