File Coverage

blib/lib/Time/Elapsed/Lang/DE.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 3 3 100.0
total 25 25 100.0


line stmt bran cond sub pod time code
1             package Time::Elapsed::Lang::DE;
2 1     1   3 use strict;
  1         1  
  1         23  
3 1     1   3 use warnings;
  1         1  
  1         23  
4 1     1   3 use utf8;
  1         1  
  1         3  
5 1     1   16 use vars qw( $VERSION );
  1         1  
  1         89  
6              
7             $VERSION = '0.32';
8              
9             sub singular {
10 1     1 1 5 return qw/
11             second Sekunde
12             minute Minute
13             hour Stunde
14             day Tag
15             week Woche
16             month Monat
17             year Jahr
18             /
19             }
20              
21             sub plural {
22 1     1 1 4 return qw/
23             second Sekunden
24             minute Minuten
25             hour Stunden
26             day Tage
27             week Wochen
28             month Monate
29             year Jahre
30             /
31             }
32              
33             sub other {
34 1     1 1 5 return qw/
35             and und
36             ago vor
37             /,
38             zero => q{Nullsekunden},
39             }
40              
41             1;
42              
43             __END__