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.012';
3             # ABSTRACT: Types for the TaxDeduction module
4              
5 5     5   71 use 5.010001;
  5         13  
6 5     5   22 use strict;
  5         7  
  5         90  
7 5     5   28 use warnings;
  5         8  
  5         118  
8 5     5   20 use utf8;
  5         8  
  5         32  
9 5         33 use Type::Library 0.040 -base, -declare => qw(
10             TaxPersons
11             MathBigFloat
12 5     5   2175 );
  5         90423  
13              
14 5     5   4333 use Type::Utils -all;
  5         19549  
  5         40  
15 5     5   15373 use Types::Standard -types;
  5         200070  
  5         39  
16              
17 5     5   18377 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__