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   1619 use strict;
  14         21  
  14         441  
4 14     14   49 use warnings;
  14         17  
  14         517  
5 14     14   49 use parent 'SQL::Wizard::Expr';
  14         15  
  14         81  
6              
7             sub new {
8 28     28 0 83 my ($class, %args) = @_;
9 28         89 $class->SUPER::new(%args);
10             }
11              
12             # args: expr => $expr_obj, alias => 'name'
13              
14             1;