Used pre instead of code for unicode characters. Sorry.
$ perl -COE -wE'use charnames (); use unicore::Name; my $script = shif +t; open my $fh, "<", $INC{"unicore/Name.pm"} =~ s/Name\.pm$/Blocks.tx +t/r; for (grep m/\b$script\b/ => <$fh>) { m/\b([0-9A-Z]+)\b\s*\.\.\s* +([0-9A-Z]+)/ or next; foreach my $c (hex ($1) .. hex ($2)) { my $nm = + charnames::viacode ($c) or next;printf "U+%05x %-5s %s\n", $c, chr ( +$c), $nm}}' Thai
U+00e01 ก THAI CHARACTER KO KAI U+00e02 ข THAI CHARACTER KHO KHAI U+00e03 ฃ THAI CHARACTER KHO KHUAT U+00e04 ค THAI CHARACTER KHO KHWAI U+00e05 ฅ THAI CHARACTER KHO KHON U+00e06 ฆ THAI CHARACTER KHO RAKHANG : : U+00e58 ๘ THAI DIGIT EIGHT U+00e59 ๙ THAI DIGIT NINE U+00e5a ๚ THAI CHARACTER ANGKHANKHU U+00e5b ๛ THAI CHARACTER KHOMUT
In reply to Re: Listing out the characters included in a character class
by Tux
in thread Listing out the characters included in a character class
by Polyglot
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |