File Coverage

blib/lib/Locale/CLDR/Locales/Jbo.pm
Criterion Covered Total %
statement 32 32 100.0
branch n/a
condition n/a
subroutine 11 11 100.0
pod n/a
total 43 43 100.0


line stmt bran cond sub pod time code
1             =encoding utf8
2              
3             =head1 NAME
4              
5             Locale::CLDR::Locales::Jbo - Package for language Lojban
6              
7             =cut
8              
9             package Locale::CLDR::Locales::Jbo;
10             # This file auto generated from Data\common\main\jbo.xml
11             # on Fri 17 Jan 12:03:31 pm GMT
12              
13 1     1   1773970 use strict;
  1         2  
  1         32  
14 1     1   3 use warnings;
  1         5  
  1         61  
15 1     1   5 use version;
  1         1  
  1         7  
16              
17             our $VERSION = version->declare('v0.46.0');
18              
19 1     1   90 use v5.12.0;
  1         3  
20 1     1   4 use mro 'c3';
  1         1  
  1         6  
21 1     1   19 use utf8;
  1         1  
  1         8  
22 1     1   40 use feature 'unicode_strings';
  1         2  
  1         113  
23 1     1   4 use Types::Standard qw( Str Int HashRef ArrayRef CodeRef RegexpRef );
  1         1  
  1         29  
24 1     1   1735 use Moo;
  1         2  
  1         9  
25              
26             extends('Locale::CLDR::Locales::Root');
27             has 'display_name_language' => (
28             is => 'ro',
29             isa => CodeRef,
30             init_arg => undef,
31             default => sub {
32             sub {
33             my %languages = (
34             'jbo' => 'la .lojban.',
35              
36             );
37             if (@_) {
38             return $languages{$_[0]};
39             }
40             return \%languages;
41             }
42             },
43             );
44              
45             has 'characters' => (
46             is => 'ro',
47             isa => HashRef,
48             init_arg => undef,
49             default => $^V ge v5.18.0
50             ? eval <<'EOT'
51             sub {
52             no warnings 'experimental::regex_sets';
53             return {
54             auxiliary => qr{[q w]},
55             index => ['a', 'b', 'c', 'd', 'e', 'f', 'g', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'r', 's', 't', 'u', 'v', 'x', 'y', 'z'],
56             main => qr{[a b c d e f g h i j k l m n o p r s t u v x y z]},
57             punctuation => qr{[, . ']},
58             };
59             },
60             EOT
61             : sub {
62             return { index => ['a', 'b', 'c', 'd', 'e', 'f', 'g', 'i', 'j', 'k', 'l', 'm', 'n', 'o', 'p', 'r', 's', 't', 'u', 'v', 'x', 'y', 'z'], };
63             },
64 1     1   145 );
  1         2  
  1         173  
65              
66              
67             has 'time_zone_names' => (
68             is => 'ro',
69             isa => HashRef,
70             init_arg => undef,
71             default => sub { {
72             'Colombia' => {
73             long => {
74             'daylight' => q#cistcika fo la kolombiias#,
75             'generic' => q#tcika fo la kolombiias#,
76             'standard' => q#nalcistcika fo la kolombiias#,
77             },
78             },
79             'Galapagos' => {
80             long => {
81             'standard' => q#tcika fo la galapagos#,
82             },
83             },
84             } }
85             );
86 1     1   686 no Moo;
  1         2  
  1         4  
87              
88             1;
89              
90             # vim: tabstop=4