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'} |