File Coverage

blib/lib/Business/RO/TaxDeduction/Types.pm
Criterion Covered Total %
statement 21 21 100.0
branch n/a
condition n/a
subroutine 8 8 100.0
pod n/a
total 29 29 100.0


line stmt bran cond sub pod time code
1             package Business::RO::TaxDeduction::Types;
2             $Business::RO::TaxDeduction::Types::VERSION = '0.011';
3             # ABSTRACT: Types for the TaxDeduction module
4              
5 4     4   81 use 5.010001;
  4         12  
6 4     4   19 use strict;
  4         17  
  4         82  
7 4     4   16 use warnings;
  4         8  
  4         94  
8 4     4   19 use utf8;
  4         5  
  4         27  
9 4         48 use Type::Library 0.040 -base, -declare => qw(
10             TaxPersons
11             MathBigFloat
12 4     4   1235 );
  4         67761  
13              
14 4     4   3674 use Type::Utils -all;
  4         14933  
  4         52  
15 4     4   13584 use Types::Standard -types;
  4         163506  
  4         43  
16              
17 4     4   16767 BEGIN { extends "Types::Standard" };
18              
19             declare "TaxPersons",
20             as "Int",
21             where { $_ >= 0 && $_ <= 4 };
22              
23             class_type MathBigFloat, { class => 'Math::BigFloat' };
24              
25             1;
26              
27             __END__