File Coverage

blib/lib/SQL/Wizard/Expr/Alias.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 15 16 93.7


line stmt bran cond sub pod time code
1             package SQL::Wizard::Expr::Alias;
2              
3 14     14   90 use strict;
  14         27  
  14         563  
4 14     14   64 use warnings;
  14         24  
  14         712  
5 14     14   71 use parent 'SQL::Wizard::Expr';
  14         27  
  14         94  
6              
7             sub new {
8 28     28 0 173 my ($class, %args) = @_;
9 28         123 $class->SUPER::new(%args);
10             }
11              
12             # args: expr => $expr_obj, alias => 'name'
13              
14             1;