%% @author Anatolii Kosorukov [rustkas.github.io/] %% @copyright 2021 by Anatolii Kosorukov %% @doc Helper function for working with Regular Expression Erlanb re module. -module(re_tuner). -export([tune/1, avoid_characters/0, save_pattern/1, replace/1, mp/1, mp/2, unicode_block/1]). -type mp() :: {re_pattern, term(), term(), term(), term()}. -type nl_spec() :: cr | crlf | lf | anycrlf | any. -type compile_option() :: unicode | anchored | caseless | dollar_endonly | dotall | extended | firstline | multiline | no_auto_capture | dupnames | ungreedy | {newline, nl_spec()} | bsr_anycrlf | bsr_unicode | no_start_optimize | ucp | never_utf. %% @doc Replace Regex pattern to more siple one. %% @returns Transformed Regex pattern. -spec tune(Regex) -> Result when Regex :: string(), Result :: string(). % \s tune("\\s") -> "[ \\t\\n\\r]"; % [^\s] tune("[^\\s]") -> "[^ \\t\\n\\r]"; % \w tune("\\w") -> "[0-9_a-zA-Z]"; % [^\w] tune("[^\\w]") -> "[^0-9_a-zA-Z]"; % \h tune("\\h") -> "[\\x9,\\x20]"; % [^\h] tune("[^\\h]") -> "[\\0-\\x8\\xA-\\x1F\\x21-x7F]"; % \v tune("\\v") -> "[\\xA-\\xD]"; % [^\h] tune("[^\\v]") -> "[\\0-\\x9\\xE-x7F]"; % Posix [[:alnum:]] tune("[[:alnum:]]") -> "[\\x30-\\x39\\x41-\\x5A\\x61-\\x7A]"; % Posix [[:^alnum:]] tune("[[:^alnum:]]") -> "[\\0-\\x29\\x3A-\\x40\\x5B-\\x60\\x7B-\\x7F]"; % Posix [[:alpha:]] tune("[[:alpha:]]") -> "[\\x41-\\x5A\\x61-\\x7A]"; % Posix [[:^alpha:]] tune("[[:^alpha:]]") -> "[\\0-\\x40\\x5B-\\x60\\x7B-\\x7F]"; % Posix [[:lower:]] tune("[[:lower:]]") -> "[\\x61-\\x7A]"; % Posix [[:^lower:]] tune("[[:^lower:]]") -> "[\\0-\\x60\\x7B-\\x7F]"; % Posix [[:upper:]] tune("[[:upper:]]") -> "[\\x41-\\x5A]"; tune("[[:^upper:]]") -> "[\\0-\\x40\\x5B-\\xF7]"; % Posix [[:digit:]] tune("[[:digit:]]") -> "[\\x30-\\x39]"; tune("[[:^digit:]]") -> "[\\0-\\x29\\x3A-\\x7F]"; % Posix [[:graph:]] tune("[[:graph:]]") -> "[\\x21-\\x7E]"; tune("[[:^graph:]]") -> "[\\0-\\x20\\x7F]"; % Posix [[:print:]] tune("[[:print:]]") -> "[\\x20-\\x7E]"; tune("[[:^print:]]") -> "[\\0-\\x1F\\x7F]"; % Posix [[:punct:]] tune("[[:punct:]]") -> "[\\x21-\\x2F\\x3A-\\x40\\x5B-\\x60\\x7B-\\x7E]"; tune("[[:^punct:]]") -> "[\\0-\\x20\\x30-\\x39\\x41-\\x5A\\x61-\\x7A\\x7F]"; % Posix [[:space:]] tune("[[:space:]]") -> "[\\x9-\\xD\\x20]"; tune("[[:^space:]]") -> "[\\0-\\x8\\xE-\\x1F\\x21-\\x7F]"; % Posix [[:cntrl:]] tune("[[:cntrl:]]") -> "[\\0-\\x1F]"; tune("[[:^cntrl:]]") -> "[\\x20-\\x7F]"; % Posix [[:ascii:]] tune("[[:ascii:]]") -> "[\\0-\\x7F]". %% @doc The list of characters which raise an error if escape character is not used. %% @returns The list of spectial characters. -spec avoid_characters() -> Result when Result :: string(). avoid_characters() -> "*.^$|{}]\-". %% @doc Make save Regex pattern which make literal for any character. %% @returns Save pattern -spec save_pattern(Pattern) -> SavePattern when Pattern :: string(), SavePattern :: string(). save_pattern(Pattern) -> "\\Q" ++ Pattern ++ "\\E". %% @doc Replace one of shorthand pattern from the list `[\s,\w,\h,v]' %% in a pattern string. %%
%% Don't apply `\w' shorthand to unicode content. %% @param Pattern searched regex pattern for replacing %% @returns Updated Regex pattern string -spec replace(Pattern) -> UpdatedPattern when Pattern :: string(), UpdatedPattern :: string(). replace(Pattern) -> CheckedShorthandsPlus = [% \s {"\\x{5c}s(?=\\+)", "[ \\\\t\\\\n\\\\r]"}, % \w {"\\x{5c}w(?=\\+)", "[0-9_a-zA-Z]"}, % \h {"\\x{5c}h(?=\\+)", "[\\\\x9\\\\x20]"}, % \v {"\\x{5c}v(?=\\+)", "[\\\\xA-\\\\xD]"}], UpdatedPatternPlus = lists:foldl(fun(Elem, Acc) -> Regex = element(1, Elem), Markup = element(2, Elem), NewContent = re:replace(Acc, Regex, Markup, [global, {return, list}]), NewContent end, Pattern, CheckedShorthandsPlus), CheckedShorthandsQuestionMark = [% \s {"\\x{5c}s(?=\\?)", "[ \\\\t\\\\n\\\\r]"}, % \w {"\\x{5c}w(?=\\?)", "[0-9_a-zA-Z]"}, % \h {"\\x{5c}h(?=\\?)", "[\\\\x9\\\\x20]"}, % \v {"\\x{5c}v(?=\\?)", "[\\\\xA-\\\\xD]"}], UpdatedPatternQuestionMark = lists:foldl(fun(Elem, Acc) -> Regex = element(1, Elem), Markup = element(2, Elem), NewContent = re:replace(Acc, Regex, Markup, [global, {return, list}]), NewContent end, UpdatedPatternPlus, CheckedShorthandsQuestionMark), CheckedShorthandsAsterisk = [% \s {"\\x{5c}s(?=\\*)", "[ \\\\t\\\\n\\\\r]"}, % \w {"\\x{5c}w(?=\\*)", "[0-9_a-zA-Z]"}, % \h {"\\x{5c}h(?=\\*)", "[\\\\x9\\\\x20]"}, % \v {"\\x{5c}v(?=\\*)", "[\\\\xA-\\\\xD]"}], UpdatedPatternAsterisk = lists:foldl(fun(Elem, Acc) -> Regex = element(1, Elem), Markup = element(2, Elem), NewContent = re:replace(Acc, Regex, Markup, [global, {return, list}]), NewContent end, UpdatedPatternQuestionMark, CheckedShorthandsAsterisk), CheckedShorthands = [% \s {"\\x{5c}s", " \\\\t\\\\n\\\\r"}, % \w {"\\x{5c}w", "0-9_a-zA-Z"}, % \h {"\\x{5c}h", "\\\\x9\\\\x20"}, % \v {"\\x{5c}v", "\\\\xA-\\\\xD"}], UpdatedPattern = lists:foldl(fun(Elem, Acc) -> Regex = element(1, Elem), Markup = element(2, Elem), NewContent = re:replace(Acc, Regex, Markup, [global, {return, list}]), NewContent end, UpdatedPatternAsterisk, CheckedShorthands), UpdatedPattern. %% @doc It is reduced form of `re:compile/1' function. %% Return opaque data type containing a compiled regular expression or raise an error `badarg'. %%
%% See also: %% [http://erlang.org/doc/man/re.html#type-mp mp()]. %% @param Regex regex pattern %% @returns Opaque data type containing a compiled regular expression -spec mp(Regex) -> MP | {error, badarg} when Regex :: string(), MP :: mp(). mp(Regex) -> case re:compile(Regex) of {ok, MP} -> MP; {error, _ErrSpec} -> error(badarg) end. %% @doc It is reduced form of `re:compile/1' function. %% Return opaque data type containing a compiled regular expression or raise an error `badarg'. %%
%% See also: %% [http://erlang.org/doc/man/re.html#type-mp mp()]. %% @param Regex regex pattern %% @param Options additional regular expression metadata %% @returns Opaque data type containing a compiled regular expression -spec mp(Regex, Options) -> MP | {error, badarg} when Regex :: string(), Options :: [Option], MP :: mp(), Option :: compile_option(). mp(Regex, Options) -> case re:compile(Regex, Options) of {ok, MP} -> MP; {error, _ErrSpec} -> error(badarg) end. %% @doc The Unicode character database divides all the code points into blocks. Each block %% consists of a single range of code points. The code points U+0000 through U+FFFF %% are divided into 156 blocks in version 6.1 of the Unicode standard. %%
%% ``` %% ‹U+0000…U+007F \p{InBasicLatin}› %% ‹U+0080…U+00FF \p{InLatin-1Supplement}› %% ‹U+0100…U+017F \p{InLatinExtended-A}› %% ‹U+0180…U+024F \p{InLatinExtended-B}› %% ‹U+0250…U+02AF \p{InIPAExtensions}› %% ‹U+02B0…U+02FF \p{InSpacingModifierLetters}› %% ‹U+0300…U+036F \p{InCombiningDiacriticalMarks}› %% ‹U+0370…U+03FF \p{InGreekandCoptic}› %% ‹U+0400…U+04FF \p{InCyrillic}› %% ‹U+0500…U+052F \p{InCyrillicSupplement}› %% ‹U+0530…U+058F \p{InArmenian}› %% ‹U+0590…U+05FF \p{InHebrew}› %% ‹U+0600…U+06FF \p{InArabic}› %% ‹U+0700…U+074F \p{InSyriac}› %% ‹U+0750…U+077F \p{InArabicSupplement}› %% ‹U+0780…U+07BF \p{InThaana}› %% ‹U+07C0…U+07FF \p{InNKo}› %% ‹U+0800…U+083F \p{InSamaritan}› %% ‹U+0840…U+085F \p{InMandaic}› %% ‹U+08A0…U+08FF \p{InArabicExtended-A}› %% ‹U+0900…U+097F \p{InDevanagari}› %% ‹U+0980…U+09FF \p{InBengali}› %% ‹U+0A00…U+0A7F \p{InGurmukhi}› %% ‹U+0A80…U+0AFF \p{InGujarati}› %% ‹U+0B00…U+0B7F \p{InOriya}› %% ‹U+0B80…U+0BFF \p{InTamil}› %% ‹U+0C00…U+0C7F \p{InTelugu}› %% ‹U+0C80…U+0CFF \p{InKannada}› %% ‹U+0D00…U+0D7F \p{InMalayalam}› %% ‹U+0D80…U+0DFF \p{InSinhala}› %% ‹U+0E00…U+0E7F \p{InThai}› %% ‹U+0E80…U+0EFF \p{InLao}› %% ‹U+0F00…U+0FFF \p{InTibetan}› %% ‹U+1000…U+109F \p{InMyanmar}› %% ‹U+10A0…U+10FF \p{InGeorgian}› %% ‹U+1100…U+11FF \p{InHangulJamo}› %% ‹U+1200…U+137F \p{InEthiopic}› %% ‹U+1380…U+139F \p{InEthiopicSupplement}› %% ‹U+13A0…U+13FF \p{InCherokee}› %% ‹U+1400…U+167F \p{InUnifiedCanadianAboriginalSyllabics}› %% ‹U+1680…U+169F \p{InOgham}› %% ‹U+16A0…U+16FF \p{InRunic}› %% ‹U+1700…U+171F \p{InTagalog}› %% ‹U+1720…U+173F \p{InHanunoo}› %% ‹U+1740…U+175F \p{InBuhid}› %% ‹U+1760…U+177F \p{InTagbanwa}› %% ‹U+1780…U+17FF \p{InKhmer}› %% ‹U+1800…U+18AF \p{InMongolian}› %% ‹U+18B0…U+18FF \p{InUnifiedCanadianAboriginalSyllabicsExtended}› %% ‹U+1900…U+194F \p{InLimbu}› %% ‹U+1950…U+197F \p{InTaiLe}› %% ‹U+1980…U+19DF \p{InNewTaiLue}› %% ‹U+19E0…U+19FF \p{InKhmerSymbols}› %% ‹U+1A00…U+1A1F \p{InBuginese}› %% ‹U+1A20…U+1AAF \p{InTaiTham}› %% ‹U+1B00…U+1B7F \p{InBalinese}› %% ‹U+1B80…U+1BBF \p{InSundanese}› %% ‹U+1BC0…U+1BFF \p{InBatak}› %% ‹U+1C00…U+1C4F \p{InLepcha}› %% ‹U+1C50…U+1C7F \p{InOlChiki}› %% ‹U+1CC0…U+1CCF \p{InSundaneseSupplement}› %% ‹U+1CD0…U+1CFF \p{InVedicExtensions}› %% ‹U+1D00…U+1D7F \p{InPhoneticExtensions}› %% ‹U+1D80…U+1DBF \p{InPhoneticExtensionsSupplement}› %% ‹U+1DC0…U+1DFF \p{InCombiningDiacriticalMarksSupplement}› %% ‹U+1E00…U+1EFF \p{InLatinExtendedAdditional}› %% ‹U+1F00…U+1FFF \p{InGreekExtended}› %% ‹U+2000…U+206F \p{InGeneralPunctuation}› %% ‹U+2070…U+209F \p{InSuperscriptsandSubscripts}› %% ‹U+20A0…U+20CF \p{InCurrencySymbols}› %% ‹U+20D0…U+20FF \p{InCombiningDiacriticalMarksforSymbols}› %% ‹U+2100…U+214F \p{InLetterlikeSymbols}› %% ‹U+2150…U+218F \p{InNumberForms}› %% ‹U+2190…U+21FF \p{InArrows}› %% ‹U+2200…U+22FF \p{InMathematicalOperators}› %% ‹U+2300…U+23FF \p{InMiscellaneousTechnical}› %% ‹U+2400…U+243F \p{InControlPictures}› %% ‹U+2440…U+245F \p{InOpticalCharacterRecognition}› %% ‹U+2460…U+24FF \p{InEnclosedAlphanumerics}› %% ‹U+2500…U+257F \p{InBoxDrawing}› %% ‹U+2580…U+259F \p{InBlockElements}› %% ‹U+25A0…U+25FF \p{InGeometricShapes}› %% ‹U+2600…U+26FF \p{InMiscellaneousSymbols}› %% ‹U+2700…U+27BF \p{InDingbats}› %% ‹U+27C0…U+27EF \p{InMiscellaneousMathematicalSymbols-A}› %% ‹U+27F0…U+27FF \p{InSupplementalArrows-A}› %% ‹U+2800…U+28FF \p{InBraillePatterns}› %% ‹U+2900…U+297F \p{InSupplementalArrows-B}› %% ‹U+2980…U+29FF \p{InMiscellaneousMathematicalSymbols-B}› %% ‹U+2A00…U+2AFF \p{InSupplementalMathematicalOperators}› %% ‹U+2B00…U+2BFF \p{InMiscellaneousSymbolsandArrows}› %% ‹U+2C00…U+2C5F \p{InGlagolitic}› %% ‹U+2C60…U+2C7F \p{InLatinExtended-C}› %% ‹U+2C80…U+2CFF \p{InCoptic}› %% ‹U+2D00…U+2D2F \p{InGeorgianSupplement}› %% ‹U+2D30…U+2D7F \p{InTifinagh}› %% ‹U+2D80…U+2DDF \p{InEthiopicExtended}› %% ‹U+2DE0…U+2DFF \p{InCyrillicExtended-A}› %% ‹U+2E00…U+2E7F \p{InSupplementalPunctuation}› %% ‹U+2E80…U+2EFF \p{InCJKRadicalsSupplement}› %% ‹U+2F00…U+2FDF \p{InKangxiRadicals}› %% ‹U+2FF0…U+2FFF \p{InIdeographicDescriptionCharacters}› %% ‹U+3000…U+303F \p{InCJKSymbolsandPunctuation}› %% ‹U+3040…U+309F \p{InHiragana}› %% ‹U+30A0…U+30FF \p{InKatakana}› %% ‹U+3100…U+312F \p{InBopomofo}› %% ‹U+3130…U+318F \p{InHangulCompatibilityJamo}› %% ‹U+3190…U+319F \p{InKanbun}› %% ‹U+31A0…U+31BF \p{InBopomofoExtended}› %% ‹U+31C0…U+31EF \p{InCJKStrokes}› %% ‹U+31F0…U+31FF \p{InKatakanaPhoneticExtensions}› %% ‹U+3200…U+32FF \p{InEnclosedCJKLettersandMonths}› %% ‹U+3300…U+33FF \p{InCJKCompatibility}› %% ‹U+3400…U+4DBF \p{InCJKUnifiedIdeographsExtensionA}› %% ‹U+4DC0…U+4DFF \p{InYijingHexagramSymbols}› %% ‹U+4E00…U+9FFF \p{InCJKUnifiedIdeographs}› %% ‹U+A000…U+A48F \p{InYiSyllables}› %% ‹U+A490…U+A4CF \p{InYiRadicals}› %% ‹U+A4D0…U+A4FF \p{InLisu}› %% ‹U+A500…U+A63F \p{InVai}› %% ‹U+A640…U+A69F \p{InCyrillicExtended-B}› %% ‹U+A6A0…U+A6FF \p{InBamum}› %% ‹U+A700…U+A71F \p{InModifierToneLetters}› %% ‹U+A720…U+A7FF \p{InLatinExtended-D}› %% ‹U+A800…U+A82F \p{InSylotiNagri}› %% ‹U+A830…U+A83F \p{InCommonIndicNumberForms}› %% ‹U+A840…U+A87F \p{InPhags-pa}› %% ‹U+A880…U+A8DF \p{InSaurashtra}› %% ‹U+A8E0…U+A8FF \p{InDevanagariExtended}› %% ‹U+A900…U+A92F \p{InKayahLi}› %% ‹U+A930…U+A95F \p{InRejang}› %% ‹U+A960…U+A97F \p{InHangulJamoExtended-A}› %% ‹U+A980…U+A9DF \p{InJavanese}› %% ‹U+AA00…U+AA5F \p{InCham}› %% ‹U+AA60…U+AA7F \p{InMyanmarExtended-A}› %% ‹U+AA80…U+AADF \p{InTaiViet}› %% ‹U+AAE0…U+AAFF \p{InMeeteiMayekExtensions}› %% ‹U+AB00…U+AB2F \p{InEthiopicExtended-A}› %% ‹U+ABC0…U+ABFF \p{InMeeteiMayek}› %% ‹U+AC00…U+D7AF \p{InHangulSyllables}› %% ‹U+D7B0…U+D7FF \p{InHangulJamoExtended-B}› %% ‹U+D800…U+DB7F \p{InHighSurrogates}› %% ‹U+DB80…U+DBFF \p{InHighPrivateUseSurrogates}› %% ‹U+DC00…U+DFFF \p{InLowSurrogates}› %% ‹U+E000…U+F8FF \p{InPrivateUseArea}› %% ‹U+F900…U+FAFF \p{InCJKCompatibilityIdeographs}› %% ‹U+FB00…U+FB4F \p{InAlphabeticPresentationForms}› %% ‹U+FB50…U+FDFF \p{InArabicPresentationForms-A}› %% ‹U+FE00…U+FE0F \p{InVariationSelectors}› %% ‹U+FE10…U+FE1F \p{InVerticalForms}› %% ‹U+FE20…U+FE2F \p{InCombiningHalfMarks}› %% ‹U+FE30…U+FE4F \p{InCJKCompatibilityForms}› %% ‹U+FE50…U+FE6F \p{InSmallFormVariants}› %% ‹U+FE70…U+FEFF \p{InArabicPresentationForms-B}› %% ‹U+FF00…U+FFEF \p{InHalfwidthandFullwidthForms}› %% ‹U+FFF0…U+FFFF \p{InSpecials}› %% ''' %% %% @param BlockName is Regular Expression block name %% @returns Regular Expressions range of code points -spec unicode_block(BlockName) -> Range | nomatch when BlockName :: string(), Range :: string(). unicode_block(BlockName) -> UnicodeBlockList = [{"\\p{InAlphabeticPresentationForms}", "[\\xFB00-\\xFB4F]"}, {"\\p{InArabic}", "[\\x600-\\x6FF]"}, {"\\p{InArabicExtended-A}", "[\\x8A0-\\x8FF]"}, {"\\p{InArabicPresentationForms-A}", "[\\xFB50-\\xFDFF]"}, {"\\p{InArabicPresentationForms-B}", "[\\xFE70-\\xFEFF]"}, {"\\p{InArabicSupplement}", "[\\x750-\\x77F]"}, {"\\p{InArmenian}", "[\\x530-\\x58F]"}, {"\\p{InArrows}", "[\\x2190-\\x21FF]"}, {"\\p{InBalinese}", "[\\x1B00-\\x1B7F]"}, {"\\p{InBamum}", "[\\xA6A0-\\xA6FF]"}, {"\\p{InBasicLatin}", "[\\x0-\\x7F]"}, {"\\p{InBatak}", "[\\x1BC0-\\x1BFF]"}, {"\\p{InBengali}", "[\\x980-\\x9FF]"}, {"\\p{InBlockElements}", "[\\x2580-\\x259F]"}, {"\\p{InBopomofo}", "[\\x3100-\\x312F]"}, {"\\p{InBopomofoExtended}", "[\\x31A0-\\x31BF]"}, {"\\p{InBoxDrawing}", "[\\x2500-\\x257F]"}, {"\\p{InBraillePatterns}", "[\\x2800-\\x28FF]"}, {"\\p{InBuginese}", "[\\x1A00-\\x1A1F]"}, {"\\p{InBuhid}", "[\\x1740-\\x175F]"}, {"\\p{InCham}", "[\\xAA00-\\xAA5F]"}, {"\\p{InCherokee}", "[\\x13A0-\\x13FF]"}, {"\\p{InCJKCompatibility}", "[\\x3300-\\x33FF]"}, {"\\p{InCJKCompatibilityForms}", "[\\xFE30-\\xFE4F]"}, {"\\p{InCJKCompatibilityIdeographs}", "[\\xF900-\\xFAFF]"}, {"\\p{InCJKRadicalsSupplement}", "[\\x2E80-\\x2EFF]"}, {"\\p{InCJKStrokes}", "[\\x31C0-\\x31EF]"}, {"\\p{InCJKSymbolsandPunctuation}", "[\\x3000-\\x303F]"}, {"\\p{InCJKUnifiedIdeographs}", "[\\x4E00-\\x9FFF]"}, {"\\p{InCJKUnifiedIdeographsExtensionA}", "[\\x3400-\\x4DBF]"}, {"\\p{InCombiningDiacriticalMarks}", "[\\x300-\\x36F]"}, {"\\p{InCombiningDiacriticalMarksforSymbols}", "[\\x20D0-\\x20FF]"}, {"\\p{InCombiningDiacriticalMarksSupplement}", "[\\x1DC0-\\x1DFF]"}, {"\\p{InCombiningHalfMarks}", "[\\xFE20-\\xFE2F]"}, {"\\p{InCommonIndicNumberForms}", "[\\xA830-\\xA83F]"}, {"\\p{InControlPictures}", "[\\x2400-\\x243F]"}, {"\\p{InCoptic}", "[\\x2C80-\\x2CFF]"}, {"\\p{InCurrencySymbols}", "[\\x20A0-\\x20CF]"}, {"\\p{InCyrillic}", "[\\x400-\\x4FF]"}, {"\\p{InCyrillicExtended-A}", "[\\x2DE0-\\x2DFF]"}, {"\\p{InCyrillicExtended-B}", "[\\xA640-\\xA69F]"}, {"\\p{InCyrillicSupplement}", "[\\x500-\\x52F]"}, {"\\p{InDevanagari}", "[\\x900-\\x97F]"}, {"\\p{InDevanagariExtended}", "[\\xA8E0-\\xA8FF]"}, {"\\p{InDingbats}", "[\\x2700-\\x27BF]"}, {"\\p{InEnclosedAlphanumerics}", "[\\x2460-\\x24FF]"}, {"\\p{InEnclosedCJKLettersandMonths}", "[\\x3200-\\x32FF]"}, {"\\p{InEthiopic}", "[\\x1200-\\x137F]"}, {"\\p{InEthiopicExtended}", "[\\x2D80-\\x2DDF]"}, {"\\p{InEthiopicExtended-A}", "[\\xAB00-\\xAB2F]"}, {"\\p{InEthiopicSupplement}", "[\\x1380-\\x139F]"}, {"\\p{InGeneralPunctuation}", "[\\x2000-\\x206F]"}, {"\\p{InGeometricShapes}", "[\\x25A0-\\x25FF]"}, {"\\p{InGeorgian}", "[\\x10A0-\\x10FF]"}, {"\\p{InGeorgianSupplement}", "[\\x2D00-\\x2D2F]"}, {"\\p{InGlagolitic}", "[\\x2C00-\\x2C5F]"}, {"\\p{InGreekandCoptic}", "[\\x370-\\x3FF]"}, {"\\p{InGreekExtended}", "[\\x1F00-\\x1FFF]"}, {"\\p{InGujarati}", "[\\xA80-\\xAFF]"}, {"\\p{InGurmukhi}", "[\\xA00-\\xA7F]"}, {"\\p{InHalfwidthandFullwidthForms}", "[\\xFF00-\\xFFEF]"}, {"\\p{InHangulCompatibilityJamo}", "[\\x3130-\\x318F]"}, {"\\p{InHangulJamo}", "[\\x1100-\\x11FF]"}, {"\\p{InHangulJamoExtended-A}", "[\\xA960-\\xA97F]"}, {"\\p{InHangulJamoExtended-B}", "[\\xD7B0-\\xD7FF]"}, {"\\p{InHangulSyllables}", "[\\xAC00-\\xD7AF]"}, {"\\p{InHanunoo}", "[\\x1720-\\x173F]"}, {"\\p{InHebrew}", "[\\x590-\\x5FF]"}, {"\\p{InHighPrivateUseSurrogates}", "[\\xDB80-\\xDBFF]"}, {"\\p{InHighSurrogates}", "[\\xD800-\\xDB7F]"}, {"\\p{InHiragana}", "[\\x3040-\\x309F]"}, {"\\p{InIdeographicDescriptionCharacters}", "[\\x2FF0-\\x2FFF]"}, {"\\p{InIPAExtensions}", "[\\x250-\\x2AF]"}, {"\\p{InJavanese}", "[\\xA980-\\xA9DF]"}, {"\\p{InKanbun}", "[\\x3190-\\x319F]"}, {"\\p{InKangxiRadicals}", "[\\x2F00-\\x2FDF]"}, {"\\p{InKannada}", "[\\xC80-\\xCFF]"}, {"\\p{InKatakana}", "[\\x30A0-\\x30FF]"}, {"\\p{InKatakanaPhoneticExtensions}", "[\\x31F0-\\x31FF]"}, {"\\p{InKayahLi}", "[\\xA900-\\xA92F]"}, {"\\p{InKhmer}", "[\\x1780-\\x17FF]"}, {"\\p{InKhmerSymbols}", "[\\x19E0-\\x19FF]"}, {"\\p{InLao}", "[\\xE80-\\xEFF]"}, {"\\p{InLatin-1Supplement}", "[\\x80-\\xFF]"}, {"\\p{InLatinExtended-A}", "[\\x100-\\x17F]"}, {"\\p{InLatinExtendedAdditional}", "[\\x1E00-\\x1EFF]"}, {"\\p{InLatinExtended-B}", "[\\x180-\\x24F]"}, {"\\p{InLatinExtended-C}", "[\\x2C60-\\x2C7F]"}, {"\\p{InLatinExtended-D}", "[\\xA720-\\xA7FF]"}, {"\\p{InLepcha}", "[\\x1C00-\\x1C4F]"}, {"\\p{InLetterlikeSymbols}", "[\\x2100-\\x214F]"}, {"\\p{InLimbu}", "[\\x1900-\\x194F]"}, {"\\p{InLisu}", "[\\xA4D0-\\xA4FF]"}, {"\\p{InLowSurrogates}", "[\\xDC00-\\xDFFF]"}, {"\\p{InMalayalam}", "[\\xD00-\\xD7F]"}, {"\\p{InMandaic}", "[\\x840-\\x85F]"}, {"\\p{InMathematicalOperators}", "[\\x2200-\\x22FF]"}, {"\\p{InMeeteiMayek}", "[\\xABC0-\\xABFF]"}, {"\\p{InMeeteiMayekExtensions}", "[\\xAAE0-\\xAAFF]"}, {"\\p{InMiscellaneousMathematicalSymbols-A}", "[\\x27C0-\\x27EF]"}, {"\\p{InMiscellaneousMathematicalSymbols-B}", "[\\x2980-\\x29FF]"}, {"\\p{InMiscellaneousSymbols}", "[\\x2600-\\x26FF]"}, {"\\p{InMiscellaneousSymbolsandArrows}", "[\\x2B00-\\x2BFF]"}, {"\\p{InMiscellaneousTechnical}", "[\\x2300-\\x23FF]"}, {"\\p{InModifierToneLetters}", "[\\xA700-\\xA71F]"}, {"\\p{InMongolian}", "[\\x1800-\\x18AF]"}, {"\\p{InMyanmar}", "[\\x1000-\\x109F]"}, {"\\p{InMyanmarExtended-A}", "[\\xAA60-\\xAA7F]"}, {"\\p{InNewTaiLue}", "[\\x1980-\\x19DF]"}, {"\\p{InNKo}", "[\\x7C0-\\x7FF]"}, {"\\p{InNumberForms}", "[\\x2150-\\x218F]"}, {"\\p{InOgham}", "[\\x1680-\\x169F]"}, {"\\p{InOlChiki}", "[\\x1C50-\\x1C7F]"}, {"\\p{InOpticalCharacterRecognition}", "[\\x2440-\\x245F]"}, {"\\p{InOriya}", "[\\xB00-\\xB7F]"}, {"\\p{InPhags-pa}", "[\\xA840-\\xA87F]"}, {"\\p{InPhoneticExtensions}", "[\\x1D00-\\x1D7F]"}, {"\\p{InPhoneticExtensionsSupplement}", "[\\x1D80-\\x1DBF]"}, {"\\p{InPrivateUseArea}", "[\\xE000-\\xF8FF]"}, {"\\p{InRejang}", "[\\xA930-\\xA95F]"}, {"\\p{InRunic}", "[\\x16A0-\\x16FF]"}, {"\\p{InSamaritan}", "[\\x800-\\x83F]"}, {"\\p{InSaurashtra}", "[\\xA880-\\xA8DF]"}, {"\\p{InSinhala}", "[\\xD80-\\xDFF]"}, {"\\p{InSmallFormVariants}", "[\\xFE50-\\xFE6F]"}, {"\\p{InSpacingModifierLetters}", "[\\x2B0-\\x2FF]"}, {"\\p{InSpecials}", "[\\xFFF0-\\xFFFF]"}, {"\\p{InSundanese}", "[\\x1B80-\\x1BBF]"}, {"\\p{InSundaneseSupplement}", "[\\x1CC0-\\x1CCF]"}, {"\\p{InSuperscriptsandSubscripts}", "[\\x2070-\\x209F]"}, {"\\p{InSupplementalArrows-A}", "[\\x27F0-\\x27FF]"}, {"\\p{InSupplementalArrows-B}", "[\\x2900-\\x297F]"}, {"\\p{InSupplementalMathematicalOperators}", "[\\x2A00-\\x2AFF]"}, {"\\p{InSupplementalPunctuation}", "[\\x2E00-\\x2E7F]"}, {"\\p{InSylotiNagri}", "[\\xA800-\\xA82F]"}, {"\\p{InSyriac}", "[\\x700-\\x74F]"}, {"\\p{InTagalog}", "[\\x1700-\\x171F]"}, {"\\p{InTagbanwa}", "[\\x1760-\\x177F]"}, {"\\p{InTaiLe}", "[\\x1950-\\x197F]"}, {"\\p{InTaiTham}", "[\\x1A20-\\x1AAF]"}, {"\\p{InTaiViet}", "[\\xAA80-\\xAADF]"}, {"\\p{InTamil}", "[\\xB80-\\xBFF]"}, {"\\p{InTelugu}", "[\\xC00-\\xC7F]"}, {"\\p{InThaana}", "[\\x780-\\x7BF]"}, {"\\p{InThai}", "[\\xE00-\\xE7F]"}, {"\\p{InTibetan}", "[\\xF00-\\xFFF]"}, {"\\p{InTifinagh}", "[\\x2D30-\\2D7Fx]"}, {"\\p{InUnifiedCanadianAboriginalSyllabics}", "[\\x1400-\\x167F]"}, {"\\p{InUnifiedCanadianAboriginalSyllabicsExtended}", "[\\x18B0-\\x18FF]"}, {"\\p{InVai}", "[\\xA500-\\xA63F]"}, {"\\p{InVariationSelectors}", "[\\xFE00-\\xFE0F]"}, {"\\p{InVedicExtensions}", "[\\x1CD0-\\x1CFF]"}, {"\\p{InVerticalForms}", "[\\xFE10-\\xFE1F]"}, {"\\p{InYijingHexagramSymbols}", "[\\x4DC0-\\x4DFF]"}, {"\\p{InYiRadicals}", "[\\xA490-\\xA4CF]"}, {"\\p{InYiSyllables}", "[\\xA000-\\xA48F]"}], Tuple = lists:keyfind(BlockName, 1, UnicodeBlockList), Result = case Tuple of false -> nomatch; _ -> element(2, Tuple) end, Result.