File Coverage

blib/lib/Finance/Bank/JP/MUFG/Transaction.pm
Criterion Covered Total %
statement 11 11 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod 0 1 0.0
total 16 17 94.1


line stmt bran cond sub pod time code
1             package Finance::Bank::JP::MUFG::Transaction;
2              
3 10     10   16540 use strict;
  10         18  
  10         332  
4 10     10   45 use warnings;
  10         20  
  10         640  
5             our $VERSION = '0.02';
6              
7             BEGIN {
8 10     10   305 my @columns = qw/ date abstract description outlay income balance memo /;
9 12     12 0 703 sub columns { @columns }
10             }
11              
12             use Class::Accessor::Lite (
13 10         29 new => 1,
14             ro => [ &columns ],
15 10     10   1271 );
  10         9473  
16              
17             1;
18             __END__