Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re^3: X11::GUITest and Umlauts

by choroba (Cardinal)
on Oct 17, 2025 at 13:58 UTC ( [id://11166540]=note: print w/replies, xml ) Need Help??


in reply to Re^2: X11::GUITest and Umlauts
in thread X11::GUITest and Umlauts

> So your theory is

Theory? It works for me, it's more than just a theory!

> why does "echo 123\n" result in +ěš ?

On the Czech QWERTY keyboard, pressing 123 produces +ěš.

map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]

Replies are listed 'Best First'.
Re^4: X11::GUITest and Umlauts
by LanX (Saint) on Oct 17, 2025 at 16:01 UTC
    > Theory? It works for me

    I was trying to figure out what you mean. s/theory/approach/

    > On the Czech QWERTY keyboard, pressing 123 produces +ěš.

    why "echo"?

    seems like you are simulating the AltGr modifier, there is a syntax with &(.) for that

    perl -MX11::GUITest=:ALL -E'SendKeys(q{&(e)}) or say "FAILED"' 
€

    [download]

    unfortunately there is no alternative for umlauts in German keyboard settings and configuring the COMPOSE key doesn't help inside X11::GUITest either.

    perl -MX11::GUITest=:ALL -E'SendKeys(q({CAP " a})) or say "FAILED"'
FAILED

    [download]

    I also briefly tested the output with the xev tool, which shows the failing request

    "   XLookupString gives 1 bytes: (0d) "

    Cheers Rolf
    (addicted to the Perl Programming Language :)
    see Wikisyntax for the Monastery

[reply]
[d/l]
[select]
      why "echo"?

      I was running xterm, not gedit. Not important.

      > seems like you are simulating the AltGr modifier

      No. On the Czech keyboard, pressing 2 produces ě, to actually get 2, you need to press Shift+2. Yes, that's how people type here, crazy, right?

      map{substr$_->[0],$_->[1]||0,1}[\*||{},3],[[]],[ref qr-1,-,-1],[{}],[sub{}^*ARGV,3]
[reply]
[d/l]
        Weird. And from google images, it looks like '@' is on 'V'? So then is shift-V '@' or uppercase 'V' and how do you get the other one?
[reply]
        > crazy, right?

        Well, not surprising, my dad had a typewriter° without "1". You had to type "l0" for "10".

        Of course was the font chosen to be closer.

        We still have this kind of ambiguities on our keyboards, like using a single quote for apostrophe (or vice versa)

        Cheers Rolf
        (addicted to the Perl Programming Language :)
        see Wikisyntax for the Monastery

        °) after some searching, it must have been the iconic Olivetti Lettera 22 or one of the successors like Olivetti Lettera 32. I still remember the turquoise case with the black stripe in the middle.

[reply]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://11166540]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? • Last hour • Other CB clients
Other Users?
Others meditating upon the Monastery: (4)
As of 2026-02-17 23:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found
    Notices?
    • hippo‥ epoptai's answer Re: how do I set a cookie and redirect was blessed by hippo!
    • erzuuli‥ Anonymous Monks are no longer allowed to use Super Search, due to an excessive use of this resource by robots.