blib/lib/App/AutoCRUD/Controller/Schema.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 3 | 0.0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
56 | 0 | 0 | 0 | $self->datasource->generated_schema || do { my $schema_class = $self->datasource->loaded_class || ref $schema || $schema; $schema_class =~ s[::][/]g; die "can't find source code for $schema_class.pm" unless my $path = $INC{$schema_class . '.pm'}; die "can't open $path" unless open my $fh, '<', $path; local $/; <$fh> } |