4 title => 'latin alphabet cheat sheet',
9 latin roman alphabet script letter unicode font glyph abc
10 writing comparison character sample test language spelling
11 cursive fraktur blind deaf
13 stylesheet => [qw'light dark red'],
19 font-family: Suetterlin; /* R. G. Arens */
20 src: url("/suetterlin.ttf");
23 font-family: Gallaudet;
24 src: url("/gallaudet.ttf");
26 .glyphs tr:first-child+tr td.di-a { font-family: Suetterlin }
27 .glyphs tr:first-child+tr+tr td.di-a { font-family: Gallaudet }
30 <h1>Latin alphabet</h1>
32 <p>Also see <a href="/writing">other alphabets</a>
33 and <a href="/unicode">common chars</a>.</p>
38 use Shiar_Sheet::FormatChar;
39 my $glyphs = Shiar_Sheet::FormatChar->new;
40 unless (exists $get{v}) {
47 latfsuet => 'Sütterlin',
48 ase => '<abbr title="American Sign Lanugage">ASL</abbr> shapes',
53 my @table = do 'writing-latn.inc.pl';
55 printf "<p>Table data not found: <em>%s</em>.</p>\n", $! || $@;
58 print $glyphs->table([map {
59 ref $_ ne 'ARRAY' ? ".>$scriptname{$_}"
60 : exists $get{uc} ? map {uc} @$_ : @$_