altgr-macos.eng.inc.pl

   1 use utf8;
   2 my @az = ('A'..'Z', 'a'..'z');
   3 my @letters = qw(
   4         Å ı Ç ð ´ ̉ ˝ ̣ ˆ ½  Þ ¾ ˜ Ø ∏ Œ ‰ / ˇ ¨ ◊ „ ˛ ¼ ¸
   5         å ∫ ç ∂ ́ ƒ © ˙ ̂ ∆ ° ¬ µ ̃ ø π œ ® ß † ̈ √ ∑ ≈ ¥ Ω
   6 );
   7 our %rows = map {
   8         $az[$_] => $letters[$_]
   9 } 0 .. $#az;
  10
  11 +{
  12         %{ do 'keyboard.eng.inc.pl' },
  13         version => '1.2',
  14 }