UI::KeyboardLayoutModule for designing keyboard layouts | |
Download |
UI::KeyboardLayout Ranking & Summary
Advertisement
- License:
- Perl Artistic License
- Price:
- FREE
- Publisher Name:
- Ilya Zakharevich
- Publisher web site:
- http://search.cpan.org/~ni-s/
UI::KeyboardLayout Tags
UI::KeyboardLayout Description
UI::KeyboardLayout is a Perl module for designing keyboard layouts.SYNOPSIS #!/usr/bin/perl -wC31 use UI::KeyboardLayout; use strict; UI::KeyboardLayout::->set_NamesList("$ENV{HOME}/Downloads/NamesList-6.1.0d8.txt"); my $i = do {local $/; open $in, '< ', 'MultiUni.kbdd' or die; < $in >}; # Init from in-memory copy of the configfile my $k = UI::KeyboardLayout:: -> new_from_configfile($i) -> fill_win_template( 1, ); print $k; open my $f, '< ', "$ENV{HOME}/Downloads/NamesList-6.1.0d8.txt" or die; my $k = UI::KeyboardLayout::->new(); my ($d,$c,$names,$blocks,$extraComb) = $k->parse_NameList($f); close $f or die; $k->print_decompositions($d); $k->print_compositions ($c); UI::KeyboardLayout::->set_NamesList("$ENV{HOME}/Downloads/NamesList-6.1.0d8.txt", "$ENV{HOME}/Downloads/DerivedAge-6.1.0d13.txt")); my $l = UI::KeyboardLayout::->new_from_configfile('examples/EurKey++.kbdd'); for my $F (qw(US CyrillicPhonetic)) { # Open file, select() print $l->fill_win_template(1,); $l->print_coverage(q(US)); }Product's homepage
UI::KeyboardLayout Related Software