writing script glyph unicode character letter comparison history
alphabet sample test language multilingual
)],
- stylesheet => [qw'light circus dark red mono'],
data => ["$include.inc.pl"],
});
$_ = showlink($_, "/writing/brahmi") for $scriptname->{brah} || ();
say $glyphs->table([map {
- my $ref = $_;
- my $lead = s/^(-)// && $1;
- (map { ".>$lead$_" }
- $scriptname->{$source.'_'.$_} || $scriptname->{$_} || $_
- ),
- @{ $info->{table}->{$ref} || [] }
+ my $lead = s/^(-)// && $1;
+ (map { ".>$lead$_" }
+ $scriptname->{$source.'_'.$_} || $scriptname->{$_} || $_
+ ),
+ @{ $info->{table}->{$_} || [] }
} @{$rows}]);
say "</div>\n";