File Coverage

blib/lib/Locale/CLDR/Transformations/Any/Hang/Latn.pm
Criterion Covered Total %
statement 33 33 100.0
branch 1 2 50.0
condition n/a
subroutine 12 12 100.0
pod n/a
total 46 47 97.8


line stmt bran cond sub pod time code
1             package Locale::CLDR::Transformations::Any::Hang::Latn;
2             # This file auto generated from Data\common\transforms\Hangul-Latin.xml
3             # on Sun 16 Dec 4:04:06 pm GMT
4              
5 1     1   898589 use strict;
  1         3  
  1         35  
6 1     1   5 use warnings;
  1         3  
  1         32  
7 1     1   5 use version;
  1         2  
  1         25  
8              
9             our $VERSION = version->declare('v0.34.0');
10              
11 1     1   113 use v5.10.1;
  1         4  
12 1     1   5 use mro 'c3';
  1         2  
  1         8  
13 1     1   27 use utf8;
  1         2  
  1         8  
14 1     1   36 use if $^V ge v5.12.0, feature => 'unicode_strings';
  1         2  
  1         15  
15 1     1   135 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         2  
  1         12  
16 1     1   1069 use Moo;
  1         2  
  1         9  
17              
18             BEGIN {
19 1 50   1   422 die "Transliteration requires Perl 5.18 or above"
20             unless $^V ge v5.18.0;
21             }
22              
23 1     1   6 no warnings 'experimental::regex_sets';
  1         2  
  1         136  
24             has 'transforms' => (
25             is => 'ro',
26             isa => ArrayRef,
27             init_arg => undef,
28             default => sub { [
29             qr/(?^um:\G.)/,
30             {
31             type => 'transform',
32             data => [
33             {
34             from => q(Any),
35             to => q(NFKD),
36             },
37             {
38             from => q(ConjoiningJamo),
39             to => q(Latin),
40             },
41             {
42             from => q(Any),
43             to => q(NFC),
44             },
45             ]
46             },
47             ] },
48             );
49              
50 1     1   5 no Moo;
  1         2  
  1         5  
51              
52             1;
53              
54             # vim: tabstop=4