keyboard.plp

   1 <(common.inc.plp)><:
   2
   3 my $include = 'keyboard.eng';
   4 my $info = Data($include);
   5
   6 Html({
   7         title => 'keyboard cheat sheet',
   8         version => '1.2',
   9         description => [
  10                 "Windows US international keyboard layout table",
  11                 "with the AltGr modifier key.",
  12         ],
  13         stylesheet => [qw( light dark circus mono red )],
  14         keys => 1,
  15         data => ["$include.inc.pl"],
  16 });
  17
  18 :>
  19 <h1>keyboard cheat sheet</h1>
  20
  21 <p>Special <a href="/unicode">characters</a> returned with the AltGr modifier
  22 for the Windows US international layout.</p>
  23
  24 <h2>normal mode (default)</h2>
  25
  26 <:
  27 use Shiar_Sheet::Keyboard 2.08;
  28 my $keys = Shiar_Sheet::Keyboard->new($info);
  29 $keys->map($get{map}) or undef $get{map};
  30 $keys->print_rows($get{rows}, [0]);
  31 $keys->print_legends(\%get);
  32