File Coverage

blib/lib/SQL/Wizard/Expr/Raw.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition 1 2 50.0
subroutine 4 4 100.0
pod 0 1 0.0
total 17 19 89.4


line stmt bran cond sub pod time code
1             package SQL::Wizard::Expr::Raw;
2              
3 14     14   75 use strict;
  14         36  
  14         403  
4 14     14   72 use warnings;
  14         22  
  14         653  
5 14     14   62 use parent 'SQL::Wizard::Expr';
  14         23  
  14         61  
6              
7             sub new {
8 22     22 0 98 my ($class, %args) = @_;
9             # args: sql => 'NOW()', bind => []
10 22   50     73 $args{bind} ||= [];
11 22         94 $class->SUPER::new(%args);
12             }
13              
14             1;