[](https://travis-ci.com/worthmine/Business-Tax-Withholding-JP) [](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>