Branch Coverage

blib/lib/SQL/Statement/Function.pm
Criterion Covered Total %
branch 14 28 50.0


line true false branch
120 2 269 unless ($sub)
126 0 271 unless $pkg
133 0 271 unless (UNIVERSAL::can($pkg, $sub))
135 0 0 unless ('main' eq $pkg)
140 0 0 unless defined $INC{$mod}
141 0 0 if $@
144 0 0 unless $pkg->can($sub)
222 395 0 &_INSTANCE($_, 'SQL::Statement::Term') ? :
225 0 395 unless defined &_NUMBER($val)
310 3 7 if $spec =~ /LEADING/
312 1 9 if $spec =~ /TRAILING/
314 6 4 if $spec =~ /BOTH/
412 5 0 defined $_[0]{'LENGTH'} ? :
475 3 0 defined $catval ? :