|
our $VERSION = version->declare('v0.25.1');
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:\uE001)),
result => q(ਁ),
revisit => 0,
},
{
before => q((?^u:[ਅ-ਔ ਾ-੍])),
after => q(),
replace => q((?^u:\uE002)),
result => q(ਂ),
revisit => 0,
},
{
before => q((?^u:[ਕ-ਹ])),
after => q(),
replace => q((?^u:\uE002)),
result => q(ੰ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE002)),
result => q(ਂ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE003)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE004)),
result => q(ਅ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE005)),
result => q(ਅ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE006)),
result => q(ਆ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE007)),
result => q(ਇ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE008)),
result => q(ਈ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE009)),
result => q(ਉ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE00A)),
result => q(ਊ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE00B)),
result => q(ਰਿ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE00C)),
result => q(ਲ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE00D)),
result => q(ਏ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE00E)),
result => q(ਏ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE00F)),
result => q(ਏ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE010)),
result => q(ਐ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE011)),
result => q(ਓ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE012)),
result => q(ਓ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE013)),
result => q(ਓ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE014)),
result => q(ਔ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE015)),
result => q(ਕ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE016)),
result => q(ਖ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE017)),
result => q(ਗ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE018)),
result => q(ਘ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE019)),
result => q(ਙ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE01A)),
result => q(ਚ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE01B)),
result => q(ਛ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE01C)),
result => q(ਜ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE01D)),
result => q(ਝ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE01E)),
result => q(ਞ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE01F)),
result => q(ਟ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE020)),
result => q(ਠ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE021)),
result => q(ਡ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE022)),
result => q(ਢ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE023)),
result => q(ਣ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE024)),
result => q(ਤ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE025)),
result => q(ਥ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE026)),
result => q(ਦ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE027)),
result => q(ਧ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE028)),
result => q(ਨ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE029)),
result => q(ਨ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE02A)),
result => q(ਪ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE02B)),
result => q(ਫ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE02C)),
result => q(ਬ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE02D)),
result => q(ਭ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE02E)),
result => q(ਮ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE02F)),
result => q(ਯ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE030)),
result => q(ਰ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE031)),
result => q(ਰ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE032)),
result => q(ਲ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE033)),
result => q(ਲ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE034)),
result => q(ਲ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE035)),
result => q(ਵ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE036)),
result => q(ਸ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE037)),
result => q(ਸ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE038)),
result => q(ਸ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE039)),
result => q(ਹ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE03C)),
result => q(਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE03D)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE03E)),
result => q(ਾ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE03F)),
result => q(ਿ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE040)),
result => q(ੀ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE041)),
result => q(ੁ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE042)),
result => q(ੂ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE043)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE044)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE045)),
result => q(ੈ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE046)),
result => q(ੇ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE047)),
result => q(ੇ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE048)),
result => q(ੈ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE049)),
result => q(ੌ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE04A)),
result => q(ੋ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE04B)),
result => q(ੋ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE04C)),
result => q(ੌ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE04D)),
result => q(੍),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE050)),
result => q(ਏਂ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE051)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE052)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE053)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE054)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE055)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE056)),
result => q(ੈ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE057)),
result => q(ੌ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE058)),
result => q(ਕ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE059)),
result => q(ਖ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE05A)),
result => q(ਗ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE05B)),
result => q(ਜ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE05C)),
result => q(ੜ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE05D)),
result => q(ਢ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE05E)),
result => q(ਫ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE05F)),
result => q(ਯ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE060)),
result => q(ਰਿ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE061)),
result => q(ਲ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE062)),
result => q(ਿ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE063)),
result => q(ੀ਼),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE064)),
result => q(।),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE065)),
result => q(॥),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE066)),
result => q(੦),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE067)),
result => q(੧),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE068)),
result => q(੨),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE069)),
result => q(੩),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE06A)),
result => q(੪),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE06B)),
result => q(੫),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE06C)),
result => q(੬),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE06D)),
result => q(੭),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE06E)),
result => q(੮),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE06F)),
result => q(੯),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE070)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE071)),
result => q(ਰ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE072)),
result => q(ਰ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE073)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE074)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE075)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE076)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE077)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE078)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE079)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE07A)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE07B)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE07C)),
result => q(ੰ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE07D)),
result => q(ੱ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE07E)),
result => q(ੲ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE07F)),
result => q(ੳ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE080)),
result => q(ੴ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE081)),
result => q(ਵ),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE082)),
result => q(),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:\uE083)),
result => q(ਤ੍),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q(),
result => q(੦),
revisit => 0,
},
{
before => q(),
after => q(),
replace => q((?^u:1)),
result => q(੧),
revisit => 0,
},
]
},
] },
);
no Moose;
__PACKAGE__->meta->make_immutable;
1;
|