<:
use Shiar_Sheet::FormatChar;
@@ -31,7 +31,7 @@ unless (exists $get{v}) {
$glyphs->{digraph}--;
}
-print $glyphs->table([qw{
+$glyphs->print(Digits => [qw{
.>Chinese 壹 è²³ å è ä¼ é¸ æ æ ç é¶
.>Chinese ä¸ äº ä¸ å äº å
ä¸ å
« ä¹ ã
.>Hangzhou 㡠㢠㣠㤠㥠㦠㧠㨠ã©
@@ -74,8 +74,9 @@ print $glyphs->table([qw{
}]);
$glyphs->print(
-Western => [qw{
- .>Latin A > B C G D > E F Y VU W Z H > - I J K L M N > X O P > - Q R > S T
+Western => [
+ '.>
Latin', qw{
+ A > B C G D > E F Y VU W Z H > - I J K L M N > X O P > - Q R > S T
.>Old_Italic ð > ð > ð ð > ð ð
> > ð ð ð ð ð ð ð ð ð ð ð > ð ð ð > ð ð ð > ð ð
.>Gothic ð° > ð± ð² ð¾ ð³ > ð´ ð > > ð
ð¶ ð· ð¸ ð > ð¹ ðº ð» ð¼ ð½ > -ð ð¿ ððµ > - -ð ð > ð ð
.>Coptic Ⲡ> Ⲡ> ⲠⲠ> Ⲡ> > > Ⲩ ⲠⲠⲠⲪ > ⲠⲠⲠⲠⲠⲬ ⲠⲠⲠ> Ⲡ- Ⲣ > Ⲥ Ⲧ
@@ -114,3 +115,5 @@ Brahmic => [qw{
:>