File Coverage

blib/lib/Iterator/BreakOn.pm
Criterion Covered Total %
statement 3 3 100.0
branch n/a
condition n/a
subroutine 1 1 100.0
pod n/a
total 4 4 100.0


line stmt bran cond sub pod time code
1             package Iterator::BreakOn;
2 2     2   47561 use base qw(Iterator::BreakOn::Base);
  2         6  
  2         1660  
3             use warnings;
4             use strict;
5             use Carp;
6             use utf8;
7             use English;
8              
9             our $VERSION = '0.2';
10              
11             # Module implementation here
12             sub new {
13             my $class = shift;
14             my @params = @_;
15              
16             return $class->SUPER::new( 'getmethod' => 'get_column', @params );
17             }
18              
19             1; # Magic true value required at end of module
20             __END__