File Coverage

blib/lib/Finance/AMEX/Transaction/CBNOT/Unknown.pm
Criterion Covered Total %
statement 6 12 50.0
branch n/a
condition n/a
subroutine 2 5 40.0
pod 3 3 100.0
total 11 20 55.0


line stmt bran cond sub pod time code
1             package Finance::AMEX::Transaction::CBNOT::Unknown 0.005;
2              
3 9     9   56 use strict;
  9         13  
  9         223  
4 9     9   37 use warnings;
  9         17  
  9         1114  
5              
6             # ABSTRACT: Represents AMEX Chargeback Notification Files (CBNOT) Unknown Rows
7              
8             sub new {
9 0     0 1   my ($class, %props) = @_;
10 0           my $self = bless {_line => $props{line}}, $class;
11 0           return $self;
12             }
13              
14 0     0 1   sub type {return 'UNKNOWN'}
15              
16             sub line {
17 0     0 1   my ($self) = @_;
18 0           return $self->{_line};
19             }
20              
21             1;
22              
23             __END__