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