[![Build Status](https://travis-ci.com/worthmine/Business-Tax-Withholding-JP.svg?branch=master)](https://travis-ci.com/worthmine/Business-Tax-Withholding-JP) [![MetaCPAN Release](https://badge.fury.io/pl/Business-Tax-Withholding-JP.svg)](https://metacpan.org/release/Business-Tax-Withholding-JP) # NAME Business::Tax::Withholding::JP - auto calculation for Japanese tax and withholding Business::Tax::Withholding::JP - ��������������������������������������������������������������������������������� # SYNOPSIS use Business::Tax::Withholding::JP; my $tax = Business::Tax::Withholding::JP->new( price => 10000 ); $tax->net(); # 10000 $tax->tax(); # 800 $tax->full(); # 10800 $tax->withholding(); # 1021 $tax->total(); # 9779 # Or you can set the date in period of special tax being expired $tax = Business::Tax::Withholding::JP->new( date => '2038-01-01' ); $tax->price(10000); $tax->withholding(); # 1000 $tax->total(); # 9800 # And you may ignore the withholings $tax = Business::Tax::Withholding::JP->new( no_wh => 1 ); $tax->price(10000); $tax->tax(); # 800 $tax->withholding(); # 0 $tax->total(); # 10800 # DESCRIPTION Business::Tax::Withholding::JP is useful calculator for long term in Japanese Business. You can get correctly taxes and withholdings from price in your context without worrying about the special tax for reconstructing from the Earthquake. the consumption tax **rate is 8%** You can also ignore the withholings. It means this module can be a tax calculator Business::Tax::Withholding::JP ������������������������������������������������������������������������ ������������������������������������������������������������������������������������������������������������������������������������������ ���������������������������������������������������������������**���������������8���** ��������� ## Constructor ### new( price => _Int_, amount => _Int_, date => _Date_, no\_wh => _Bool_ ); You can omit these paramators. ������������������������������������������������������ - price the price of your products will be set. defaults 0. ���������������������������������������������������������������0��������� - amount the amount of your products will be set. defaults 1. ���������������������������������������������������������1��������� - date You can set payday. the net of withholding depends on this. default is today. ��������������������������������������������������������������������������������������������������������������������������������������������������� - no\_wh If you set this flag, the all you can get is only tax and total. defaults 0 and this is read-only. ������������������������������������������������������������������������������������������������������������������0������������������������������������������������������ ## Methods and subroutine - price You can reset the price. price ������������������������������ - amount You can reset the amount. amount ������������������������������ - date You can reset the payday like 'YYYY-MM-DD' date ������������������������������������������������������'YYYY-MM-DD'���-��������������������� - net You can get the net of your pay. it's equal to the price. So it's the alias of price(). net ��� price ������������������������������ - tax You can get the net of your tax. ��������������������������������������������������� - full You can get the net of your pay including tax. ������������������������������������������������ - withholding You can get the net of your withholding from your pay. ��������������������������������������������������� - total You can get the total of your pay including tax without withholding ������������������������������������������������������������������������������������������������������������ # LICENSE Copyright (C) worthmine. This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. # AUTHOR worthmine <worthmine@cpan.org>