File Coverage

blib/lib/Math/Currency/de_DE.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package Math::Currency::de_DE;
2             $Math::Currency::de_DE::VERSION = '0.52';
3             # ABSTRACT: de_DE Locale Module for Math::Currency
4              
5 1     1   11 use utf8;
  1         2  
  1         13  
6 1     1   42 use strict;
  1         3  
  1         25  
7 1     1   7 use warnings;
  1         3  
  1         35  
8 1     1   7 use Math::Currency qw($LC_MONETARY $FORMAT);
  1         3  
  1         233  
9 1     1   9 use base qw(Exporter Math::Currency);
  1         3  
  1         485  
10              
11             our $LANG = 'de_DE';
12              
13             $LC_MONETARY->{de_DE} = {
14             CURRENCY_SYMBOL => '€',
15             FRAC_DIGITS => '2',
16             INT_CURR_SYMBOL => 'EUR ',
17             INT_FRAC_DIGITS => '2',
18             MON_DECIMAL_POINT => ',',
19             MON_GROUPING => '3',
20             MON_THOUSANDS_SEP => '.',
21             NEGATIVE_SIGN => '-',
22             N_CS_PRECEDES => '0',
23             N_SEP_BY_SPACE => '1',
24             N_SIGN_POSN => '1',
25             POSITIVE_SIGN => '',
26             P_CS_PRECEDES => '0',
27             P_SEP_BY_SPACE => '1',
28             P_SIGN_POSN => '1'
29             };
30              
31             require Math::Currency::EUR;
32              
33             1;
34              
35             __END__