Branch Coverage

File:blib/lib/Database/BI/Model/DataSource.pm
Coverage:93.8%

line%coveragebranch
56100TF@parts ? :
61100TFunless (length $last and $last =~ /\A[A-Za-z_]/)
64100TFdefined $host ? :
85100TF@args ? :
95100TFif (my $i18n = $self->{'_i18n'})
180100TFif exists $raw->{'url'}
192100TFunless -d $args->{'directory'}
195100TFunless $args->{'table'} =~ /$TABLE_NAME_RE/
223100TFunless $url =~ m[\Ahttps?://]i
262100TFunless $pkg->isa("Database::Abstraction")
27350TFif $@
300100TFunless -r $path
30550TFunless open $fh, "<", $path
308100TFunless defined $line
312100TFif ($ext eq 'psv') { }
320100TF@probe == 1 && $line =~ /!/ ? :
32950TF@cols ? :
360100TFunless $pkg->isa("Database::Abstraction")
375100TFdefined $info->{'sep_char'} ? :
378100TFif ($@)
504100TFif ($@)
508100TFunless defined $data
514100TFif (ref $data eq "HASH")
519100TFunless (@{$data;})