5 use open IO => ':utf8';
9 $header{content_type} = 'text/html; charset=utf-8';
11 :><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
12 "http://www.w3.org/TR/html4/loose.dtd">
16 <title>digraph cheat sheet</title>
17 <meta http-equiv="content-type" content="utf-8">
18 <!-- link rel="stylesheet" type="text/css" media="all" href="unicode.css" -->
21 border-collapse: collapse;
25 border: 1px solid #888;
42 <h1>Common Digraphs</h1>
44 <p>i^k in <a href="/">Vim</a>.
45 Also see the <a href="/digraphs">complete digraphs table</a>.</p>
48 my $diinfo = do 'digraphs.inc.pl';
49 my %di = map { $diinfo->{$_}->[0] => $_ } grep { ref $diinfo->{$_} }
61 my ($width, $digraphs) = @_;
64 push @cells, sprintf '<td title="%s">%s%s',
65 $di{ord $_} && $diinfo->{$di{ord $_}}->[1],
66 $_ eq '-' ? ' ' : quote($_),
67 $di{ord $_} && sprintf(' <small>%s</small>', $di{ord $_})
71 push @rows, sprintf '<tr>%s', join '', splice @cells, 0, $width, ()
74 return sprintf "<table>%s</table>\n", join '', @rows;
77 print "<h2>Arrows</h2>\n\n";
78 print table(@$_) for (
79 [ 4 => [qw{↖ ↑ ↗ ↔ ← - → ↕ ↙ ↓ ↘ -}]],
80 [ 4 => [qw{⇖ ⇑ ⇗ ⇔ ⇐ - ⇒ ⇕ ⇘ ⇓ ⇙ -}]],
81 [ 3 => [qw{◤ ▲ ◥ ◀ ◆ ▶ ◣ ▼ ◢}]],
82 [ 3 => [qw{◸ △ ◹ ◁ ◇ ▷ ◺ ▽ ◿}]],
85 print "<h2>Line drawing</h2>\n\n";
86 print table(@$_) for (
87 [ 4 => [qw{┌ ┬ ┐ ─ ├ ┼ ┤ │ └ ┴ ┘ -}]],
88 [ 4 => [qw{┏ ┳ ┓ ━ ┣ ╋ ┫ ┃ ┗ ┻ ┛ -}]],
89 [ 3 => [qw{┍ ┯ ┑ ┝ ┿ ┥ ┕ ┷ ┙}]],
90 [ 3 => [qw{┎ ┰ ┒ ┠ ╂ ┨ ┖ ┸ ┚}]],
91 # [ 4 => [qw{╔ ╦ ╗ ═ ╠ ╬ ╣ ║ ╚ ╩ ╝ -}]],
92 # [ 3 => [qw{╒ ╤ ╕ ╞ ╪ ╡ ╘ ╧ ╛}]],
93 # [ 3 => [qw{╓ ╥ ╖ ╟ ╫ ╢ ╙ ╨ ╜}]],
96 print "<h2>Signs</h2>\n\n";
97 print table(@$_) for (
98 [ 3 => [qw{▘ ▀ ▝ ▌ █ ▐ ▖ ▄ ▗}]],
99 [ 3 => [qw{░ ▒ ▓ □ ▣ ■ ▤ ▦ ▥ ▧ ▩ ▨}]],
100 [ 4 => [qw{♠ ♡ ♢ ♣ ♤ ♥ ♦ ♧}]],
101 [10 => [qw{☼ ☿ ♀ ♁ ♂ ♃ ♄ ♅ ♆ ♇}]], # solar
102 # [12 => [qw{♈ ♉ ♊ ♋ ♌ ♍ ♎ ♏ ♐ ♑ ♒ ♓}]], # zodiac
103 [ 8 => [qw{¤ ¢ ₥ € £ ₨ $ ¥ ₫ ₭ ₦ ₱ ₧ ₮ ₩ ₪}]],
106 print "<h2>IPA</h2>\n\n";
107 print table(@$_) for (
109 p t - ʈ - c k q - ʔ - ʡ
110 b d - ɖ - ɟ ɡ ɢ - - - -
111 m ɱ - n - ɳ ɲ ŋ ɴ - - -
112 ʙ - - r - - - - - - - -
113 - ⱱ - ɾ - ɽ - - - - - -
114 ɸ f θ s ʃ ʂ ç x χ ħ h ʜ
115 β v ð z ʒ ʐ ʝ ɣ ʁ ʕ ɦ ʢ
116 - - - ɬ - - - - - - - -
117 - - - ɮ - - - - - - - -
118 - ʋ - ɹ - ɻ j ɰ - - - -
119 - - - l - ɭ ʎ ʟ - - - -
120 ʘ - ǀ ǁ ǃ - ǂ - - - - -
121 ɓ - ɗ - - - ʄ ɠ ʛ - - -