File Coverage

blib/lib/DBomb/Query/LeftJoin.pm
Criterion Covered Total %
statement 13 13 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 1 0.0
total 17 18 94.4


line stmt bran cond sub pod time code
1             package DBomb::Query::LeftJoin;
2              
3             =head1 NAME
4              
5             DBomb::Query::LeftJoin - Abstracts a LEFT OUTER JOIN
6              
7             =head1 SYNOPSIS
8              
9             =cut
10              
11 12     12   69 use strict;
  12         25  
  12         468  
12 12     12   73 use warnings;
  12         24  
  12         581  
13             our $VERSION = '$Revision: 1.3 $';
14              
15 12     12   69 use base qw(DBomb::Query::Join);
  12         22  
  12         1881  
16              
17             sub init {
18 1     1 0 16 my $self = shift;
19 1         11 $self->SUPER::init(@_);
20 1         86 $self->type('LEFT');
21 1         39 return $self;
22             }
23              
24              
25             1;
26             __END__