File Coverage

blib/lib/Lingua/BG/Numbers.pm
Criterion Covered Total %
statement 13 14 92.8
branch n/a
condition n/a
subroutine 5 6 83.3
pod 2 2 100.0
total 20 22 90.9


line stmt bran cond sub pod time code
1             package Lingua::BG::Numbers;
2 1     1   1358 use strict;
  1         3  
  1         50  
3              
4 1     1   6 use Lingua::Slavic::Numbers;
  1         1  
  1         63  
5 1     1   5 use Exporter;
  1         2  
  1         42  
6 1     1   6 use vars qw( $VERSION @EXPORT_OK @EXPORT @ISA);
  1         1  
  1         438  
7             @EXPORT_OK = qw( &number_to_bg &ordinate_to_bg );
8             @EXPORT = @EXPORT_OK;
9             $VERSION = 0.02;
10             @ISA = qw(Exporter);
11              
12 0     0 1 0 sub ordinate_to_bg { return Lingua::Slavic::Numbers::ordinate_to_slavic(LANG_BG, @_); }
13 70     70 1 32702 sub number_to_bg { return Lingua::Slavic::Numbers::number_to_slavic(LANG_BG, @_); }
14              
15             1;
16              
17             __END__