1package Math::Currency::ja_JP;
2$Math::Currency::ja_JP::VERSION = '0.52';
3# ABSTRACT: ja_JP Locale Module for Math::Currency
4
5use utf8;
6use strict;
7use warnings;
8use Math::Currency qw($LC_MONETARY $FORMAT);
9use base qw(Exporter Math::Currency);
10
11our $LANG  = 'ja_JP';
12
13$LC_MONETARY->{ja_JP} = {
14    INT_CURR_SYMBOL   => 'JPY ',
15    CURRENCY_SYMBOL   => '¥',
16    MON_DECIMAL_POINT => '.',
17    MON_THOUSANDS_SEP => ',',
18    MON_GROUPING      => '3',
19    POSITIVE_SIGN     => '',
20    NEGATIVE_SIGN     => '-',
21    INT_FRAC_DIGITS   => '0',
22    FRAC_DIGITS       => '0',
23    P_CS_PRECEDES     => '1',
24    P_SEP_BY_SPACE    => '0',
25    N_CS_PRECEDES     => '1',
26    N_SEP_BY_SPACE    => '0',
27    P_SIGN_POSN       => '4',
28    N_SIGN_POSN       => '4'
29};
30
31require Math::Currency::JPY;
32
331;
34
35__END__
36
37=pod
38
39=head1 NAME
40
41Math::Currency::ja_JP - ja_JP Locale Module for Math::Currency
42
43=head1 VERSION
44
45version 0.52
46
47=head1 SOURCE
48
49The development version is on github at L<http://github.com/mschout/perl-math-currency>
50and may be cloned from L<git://github.com/mschout/perl-math-currency.git>
51
52=head1 BUGS
53
54Please report any bugs or feature requests to bug-math-currency@rt.cpan.org or through the web interface at:
55 http://rt.cpan.org/Public/Dist/Display.html?Name=Math-Currency
56
57=head1 AUTHOR
58
59Michael Schout <mschout@cpan.org>
60
61=head1 COPYRIGHT AND LICENSE
62
63This software is copyright (c) 2001 by John Peacock <jpeacock@cpan.org>.
64
65This is free software; you can redistribute it and/or modify it under
66the same terms as the Perl 5 programming language system itself.
67
68=cut
69