[![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>