|
our $VERSION = version->declare('v0.29.0');
use if $^V ge v5.12.0, feature => 'unicode_strings';
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((?^u:t\')),
result => q(),
revisit => 2,
},
{
before => q(),
after => q(),
replace => q((?^u:t͡)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:d͡ʒ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:d͡z)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:r̩)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:u̯)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ŋ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ɔ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ɛ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ɟ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ɡ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ɦ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ɪ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ɱ)),
result => q(),
revisit => 1,
},
{
before => q(),
after => q(),
replace => q((?^u:ʎ)),
result => q(),
revisit => 1,
},
],
},
{
type => 'transform',
data => [
{
from => q(Any),
to => q(Null),
},
],
},
{
type => 'conversion',
data => [
{
before => q(),
after => q(),
replace => q((?^u:([bcdfghklmnprstvzʃʒ])ː)),
result => q($1$1),
revisit => 0,
},
],
},
{
type => 'transform',
data => [
{
from => q(Any),
to => q(Null),
},
],
},
{
type => 'conversion',
data => [
{
before => q(),
after => q(),
replace => q((?^u:a)),
result => q(ア),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ba)),
result => q(バ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:be)),
result => q(ベ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:bi)),
result => q(ビ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:bo)),
result => q(ボ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:bu)),
result => q(ブ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:b)),
result => q(ブ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ca)),
result => q(チャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ce)),
result => q(チェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ci)),
result => q(チ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:cu)),
result => q(チュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:co)),
result => q(チョ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:c)),
result => q(チ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:da)),
result => q(ダ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:de)),
result => q(デ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:di)),
result => q(ディ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:do)),
result => q(ド),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:du)),
result => q(ドゥ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:d)),
result => q(ド),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:e)),
result => q(エ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:fa)),
result => q(ファ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:fe)),
result => q(フェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:fi)),
result => q(フィ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:fo)),
result => q(フォ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:fu)),
result => q(フ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:f)),
result => q(フ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ga)),
result => q(ガ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ge)),
result => q(ゲ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:gi)),
result => q(ギ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:go)),
result => q(ゴ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:gu)),
result => q(グ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:g)),
result => q(グ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ha)),
result => q(ハ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:hwe)),
result => q(フェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:he)),
result => q(ヘ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:hi)),
result => q(ヒ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ho)),
result => q(ホ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:hu)),
result => q(フ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:h)),
result => q(フ),
revisit => 0,
},
{
before => q((?^u:^)),
after => q(),
replace => q((?^u:ia)),
result => q(ヤ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:i)),
result => q(イ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ja)),
result => q(ヤ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:je)),
result => q(イェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ji)),
result => q(イ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:jo)),
result => q(ヨ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ju)),
result => q(ユ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ka)),
result => q(カ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ke)),
result => q(ケ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ki)),
result => q(キ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ko)),
result => q(コ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ku)),
result => q(ク),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:k)),
result => q(ク),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:l\'a)),
result => q(リヤ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:l\'e)),
result => q(レ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:l\'i)),
result => q(リ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:l\'o)),
result => q(リヨ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:l\'u)),
result => q(リユ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:l\')),
result => q(リ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:la)),
result => q(ラ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:le)),
result => q(レ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:li)),
result => q(リ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:lo)),
result => q(ロ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:lu)),
result => q(ル),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:l)),
result => q(ル),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ma)),
result => q(マ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:me)),
result => q(メ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:mi)),
result => q(ミ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:mo)),
result => q(モ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:mu)),
result => q(ム),
revisit => 0,
},
{
before => q(),
after => q((?^u:[bp])),
replace => q((?^u:m)),
result => q(ン),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:m)),
result => q(ム),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ɲa)),
result => q(ニャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ɲe)),
result => q(ネ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ɲi)),
result => q(ニ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ɲo)),
result => q(ニョ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ɲu)),
result => q(ニュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ɲ)),
result => q(ニ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:na)),
result => q(ナ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ne)),
result => q(ネ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ni)),
result => q(ニ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:no)),
result => q(ノ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:nu)),
result => q(ヌ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:n)),
result => q(ン),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:o)),
result => q(オ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:pa)),
result => q(パ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:pe)),
result => q(ペ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:pi)),
result => q(ピ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:po)),
result => q(ポ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:pu)),
result => q(プ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:p)),
result => q(プ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ra)),
result => q(ラ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:re)),
result => q(レ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ri)),
result => q(リ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ro)),
result => q(ロ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ru)),
result => q(ル),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:r)),
result => q(ル),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:sa)),
result => q(サ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:se)),
result => q(セ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:si)),
result => q(シ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:so)),
result => q(ソ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:su)),
result => q(ス),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:s)),
result => q(ス),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʃa)),
result => q(シャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʃe)),
result => q(シェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʃio)),
result => q(ショ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʃi)),
result => q(シ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʃo)),
result => q(ショ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʃu)),
result => q(シュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʃ)),
result => q(シュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ta)),
result => q(タ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:te)),
result => q(テ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ti)),
result => q(ティ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:to)),
result => q(ト),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tu)),
result => q(トゥ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃa)),
result => q(チャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃea)),
result => q(チャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃe)),
result => q(チェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃiu)),
result => q(チュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃi)),
result => q(チ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃo)),
result => q(チョ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃu)),
result => q(チュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tʃ)),
result => q(チュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tsa)),
result => q(チャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tse)),
result => q(ツェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tsi)),
result => q(ツィ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tso)),
result => q(ツォ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:tsu)),
result => q(ツ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ts)),
result => q(ツ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:t)),
result => q(ト),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:u)),
result => q(ウ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:va)),
result => q(バ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ve)),
result => q(ベ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:vu)),
result => q(ブ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:vi)),
result => q(ビ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:vo)),
result => q(ボ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:v)),
result => q(ヴ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:wa)),
result => q(ワ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:we)),
result => q(エ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:wi)),
result => q(イ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:wo)),
result => q(オ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:wu)),
result => q(ウ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:w)),
result => q(ウ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:xa)),
result => q(ハ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:xe)),
result => q(ヘ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:xi)),
result => q(ヒ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:xo)),
result => q(ホ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:xu)),
result => q(フ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:x)),
result => q(フ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:za)),
result => q(ザ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ze)),
result => q(ゼ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:zi)),
result => q(ジ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:zo)),
result => q(ゾ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:zu)),
result => q(ズ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:z)),
result => q(ズ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒa)),
result => q(ジャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒea)),
result => q(ジャ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒe)),
result => q(ジェ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒiu)),
result => q(ジュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒi)),
result => q(ジ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒo)),
result => q(ジョ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒu)),
result => q(ジュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ʒ)),
result => q(ジュ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:ː)),
result => q(ー),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\')),
result => q(・),
revisit => 0,
},
]
},
] },
);
no Moo;
1;
|