File Coverage

blib/lib/Time/Elapsed/Lang/TR.pm
Criterion Covered Total %
statement 17 17 100.0
branch n/a
condition n/a
subroutine 7 7 100.0
pod 1 1 100.0
total 25 25 100.0


line stmt bran cond sub pod time code
1             package Time::Elapsed::Lang::TR;
2             $Time::Elapsed::Lang::TR::VERSION = '0.34';
3 2     2   120603 use strict;
  2         3  
  2         79  
4 2     2   6 use warnings;
  2         4  
  2         84  
5 2     2   7 use vars qw( $VERSION );
  2         2  
  2         101  
6 2     2   743 use subs qw( singular plural );
  2         452  
  2         8  
7 2     2   443 use utf8;
  2         195  
  2         7  
8              
9             *plural = \&singular;
10              
11             sub singular {
12 2     2   12 return qw/
13             second saniye
14             minute dakika
15             hour saat
16             day gün
17             week hafta
18             month ay
19             year yıl
20             /
21             }
22              
23             sub other {
24 1     1 1 6 return qw/
25             and ve
26             ago önce
27             /,
28             zero => q{sıfır saniye},
29             }
30              
31             1;
32              
33             __END__