<:
use Shiar_Sheet::Keyboard 2;
my $info = do 'readline.eng.inc.pl' or die $@;
-$info->{def} = do 'readline.inc.pl';
my $keys = Shiar_Sheet::Keyboard->new($info);
$keys->map($get{map}) or undef $get{map};
$keys->print_rows($get{rows} || '^x=213', [4,3,2]);