File Coverage

lib/UR/DataSource/RDBMS/Operator/NotLike.pm
Criterion Covered Total %
statement 11 11 100.0
branch 1 2 50.0
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 15 17 88.2


line stmt bran cond sub pod time code
1 3     3   1972 use strict;
  3         5  
  3         95  
2 3     3   10 use warnings;
  3         5  
  3         370  
3              
4             package UR::DataSource::RDBMS::Operator::NotLike;
5              
6             sub generate_sql_for {
7 19     19 0 34 my($class, $expr_sql, $val, $escape) = @_;
8              
9 19         31 my $sql = "$expr_sql not like ?";
10 19 50       43 if ($escape) {
11 19         35 $sql .= " escape $escape";
12             }
13 19         52 return ($sql, $val);
14             }
15              
16             1;