File Coverage

blib/lib/Rosetta/Engine/Example/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   3573 use 5.008001;
  1         4  
  1         36  
3 1     1   5 use utf8;
  1         1  
  1         5  
4 1     1   20 use strict;
  1         2  
  1         27  
5 1     1   4 use warnings;
  1         3  
  1         29  
6              
7             ###########################################################################
8             ###########################################################################
9              
10             # Constant values used by packages in this file:
11 1     1   428 use only 'Readonly' => '1.03-';
  0            
  0            
12             Readonly my %TEXT_STRINGS => (
13             );
14              
15             ###########################################################################
16             ###########################################################################
17              
18             { package Rosetta::Engine::Example::L::en; # module
19             use version; our $VERSION = qv('0.2.1');
20             sub get_text_by_key {
21             my (undef, $msg_key) = @_;
22             return $TEXT_STRINGS{$msg_key};
23             }
24             } # module Rosetta::Engine::Example::L::en
25              
26             ###########################################################################
27             ###########################################################################
28              
29             1; # Magic true value required at end of a reuseable file's code.
30             __END__