File Coverage

blib/lib/Rosetta/L/en.pm
Criterion Covered Total %
statement 13 15 86.6
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 18 20 90.0


line stmt bran cond sub pod time code
1             #!perl
2 1     1   2576 use 5.008001;
  1         5  
  1         41  
3 1     1   6 use utf8;
  1         2  
  1         7  
4 1     1   24 use strict;
  1         2  
  1         44  
5 1     1   6 use warnings;
  1         1  
  1         65  
6              
7             ###########################################################################
8             ###########################################################################
9              
10             # Constant values used by packages in this file:
11 1     1   518 use only 'Readonly' => '1.03-';
  0            
  0            
12             Readonly my %TEXT_STRINGS => (
13             );
14              
15             ###########################################################################
16             ###########################################################################
17              
18             { package Rosetta::L::en; # module
19             use version; our $VERSION = qv('0.210.1');
20             sub get_text_by_key {
21             my (undef, $msg_key) = @_;
22             return $TEXT_STRINGS{$msg_key};
23             }
24             } # module Rosetta::L::en
25              
26             ###########################################################################
27             ###########################################################################
28              
29             1; # Magic true value required at end of a reuseable file's code.
30             __END__