# This file auto generated from Data\common\transforms\Latin-ASCII.xml
# on Wed 3 Jan 11:17:34 pm GMT
use
strict;
use
warnings;
use
version;
our
$VERSION
= version->declare(
'v0.40.0'
);
use
v5.10.1;
use
utf8;
use
if
$^V ge v5.12.0,
feature
=>
'unicode_strings'
;
use
Moo;
BEGIN {
die
"Transliteration requires Perl 5.18 or above"
unless
$^V ge v5.18.0;
}
no
warnings
'experimental::regex_sets'
;
has
'transforms'
=> (
is
=>
'ro'
,
isa
=> ArrayRef,
init_arg
=>
undef
,
default
=>
sub
{ [
qr/(?^um:\G.)/
,
{
type
=>
'transform'
,
data
=> [
],
},
{
type
=>
'conversion'
,
data
=> [
{
before
=>
q()
,
after
=>
q()
,
replace
=>
q(→\')
,
result
=>
q()
,
revisit
=> 0,
},
]
},
] },
);
no
Moo;
1;
# vim: tabstop=4