File Coverage

blib/lib/Finance/Tax/Aruba/Income/2023.pm
Criterion Covered Total %
statement 10 11 90.9
branch 1 2 50.0
condition n/a
subroutine 4 4 100.0
pod 1 1 100.0
total 16 18 88.8


line stmt bran cond sub pod time code
1             package Finance::Tax::Aruba::Income::2023;
2             our $VERSION = '0.009';
3 4     4   72173 use Moose;
  4         12  
  4         65  
4 4     4   28171 use namespace::autoclean;
  4         9  
  4         42  
5              
6             # ABSTRACT: Income tax calculator for the year 2023
7              
8             with qw(
9             Finance::Tax::Aruba::Role::Income::TaxYear
10             );
11              
12             has '+taxfree_max' => (
13             default => 30_000,
14             );
15              
16             sub _build_tax_bracket {
17             return [
18 9     9   381 { min => 0, max => 34930, fixed => 0, rate => 12 },
19             {
20             min => 34930,
21             max => 63904,
22             fixed => 3493,
23             rate => 21,
24             },
25             {
26             min => 63904,
27             max => 135527,
28             fixed => 9577.50,
29             rate => 42
30             },
31             {
32             min => 135527,
33             max => 'inf' * 1,
34             fixed => 39659.20,
35             rate => 52
36             },
37             ];
38             }
39              
40             sub is_year {
41 9     9 1 18 my $self = shift;
42 9         24 my $year = shift;
43 9 50       36 return 1 if $year == 2023;
44 0           return 0;
45             }
46              
47              
48             __PACKAGE__->meta->make_immutable;
49              
50             __END__
51              
52             =pod
53              
54             =encoding UTF-8
55              
56             =head1 NAME
57              
58             Finance::Tax::Aruba::Income::2023 - Income tax calculator for the year 2023
59              
60             =head1 VERSION
61              
62             version 0.009
63              
64             =head1 SYNOPSIS
65              
66             =head1 DESCRIPTION
67              
68             Calculate your taxes and other social premiums for the year 2023
69              
70             =head1 METHODS
71              
72             =head2 is_year
73              
74             Year selector method
75              
76             if ($module->is_year(2023)) {
77             return "year is 2023";
78             }
79              
80             =head1 SEE ALSO
81              
82             This class implements the L<Finance::Tax::Aruba::Role::Income::TaxYear> role.
83              
84             =head1 AUTHOR
85              
86             Wesley Schwengle <waterkip@cpan.org>
87              
88             =head1 COPYRIGHT AND LICENSE
89              
90             This software is Copyright (c) 2020 by Wesley Schwengle.
91              
92             This is free software, licensed under:
93              
94             The (three-clause) BSD License
95              
96             =cut