sub InThaiLCons { return join "\n", '0E04', '0E05', '0E06', '0E07', '0E0A', '0E0B', '0E0C', '0E0D', '0E11', '0E12', '0E13', '0E17', '0E18', '0E19', '0E1E', '0E1F', '0E20', '0E21', '0E22', '0E23', '0E24', '0E25', '0E26', '0E27', '0E2C', '0E2E', } #### sub InThaiLCons { return [qw{ 0E04 0E05 0E06 0E07 0E0A 0E0B 0E0C 0E0D 0E11 0E12 0E13 0E17 0E18 0E19 0E1E 0E1F 0E20 0E21 0E22 0E23 0E24 0E25 0E26 0E27 0E2C 0E2E }] }