NCurses - getch - Enter - OS (Raku / Perl 6)

[thread]20452[/thread]

NCurses - getch - Enter - OS

Tags: perl6 Ähnliche Threads

Leser: 14

Articles: hide open all | hide show old branches

+7 replies
Kuerbis

2018-04-24 10:37
User since
2011-03-20
938 Artikel
BenutzerIn
Hallo,

wenn ich "Enter" drücke bekomme ich von getch auf meinem Linux-PC 10 zurück. Wird bei anderen Betriebssystemen beim Drücken von "Enter" etwas anderes zurückgegeben oder bleibt das immer gleich (immer 10)?
Code (perl): (dl )

1 2 3 4 5 6 7 8 9

use NCurses; my $win = initscr(); noecho(); cbreak(); keypad( $win, True ); my $key = getch(); endwin(); say $key;
- +5 replies
- rosti
  
  2018-04-24 10:47
  
  User since
  2011-03-19
  3194 Artikel
  BenutzerIn
  
  10 ist die Sequenz für Newline. Es ist möglich daß unter anderen OS ein Carriage Return hinzugefügt wird beim Drücken der Entertaste. Das wäre zu prüfen bzw. zu recherchieren.
  
  MfG
  - +4 replies
  - Kuerbis
    
    2018-04-24 16:55
    
    User since
    2011-03-20
    938 Artikel
    BenutzerIn
    
    Hab nur Linux zur Verfügung. Aber wenn ich einfach auf beides prüfe - Newline und Carriage Return - , dann müsste ich auf der sicheren Seite sein.
    - +3 replies
    - rosti
      
      2018-04-24 17:25
      
      User since
      2011-03-19
      3194 Artikel
      BenutzerIn
      
      Hi,
      
      hab auf XP getestet, da bringt Enter nur 0x0A bzw. 10 also die Sequenz für Newline. MfG
      - +2 replies
      - Kuerbis
        
        2018-04-25 09:38
        
        User since
        2011-03-20
        938 Artikel
        BenutzerIn
        
        thx!
        
        rosti
        
        2018-04-25 10:21
        
        User since
        2011-03-19
        3194 Artikel
        BenutzerIn
        
        So getestet:
        
        Code (perl): (dl )
        
        1 2 3 4 5
        
        use strict; use warnings; my $in = <STDIN>; printf "Anzahl Bytes: %d\nOktetten: %02X %02X", length $in, unpack "C*", $in;
        
        Und auf der Zeil (A eingeben, Enter drücken):
        
        Code: (dl )
        
        1 2 3 4
        
        D:\home\dev>stdin.pl A Anzahl Bytes: 2 Oktetten: 41 0A
        
        .
- Linuxer
  
  2018-04-24 13:36
  
  User since
  2006-01-27
  3870 Artikel
  HausmeisterIn
  
  Hi,
  ist das wirklich ein Perl6 Problem?
  Oder bist Du vielleicht im Forum verrutscht?
  
  Scheint wirklich Perl6 zu sein; konnte kein Modul Ncurses für Perl5 finden, aber für Perl6. ;-)
  Last edited: 2018-04-24 15:14:25 +0200 (CEST)
  meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
  Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!

View all threads created 2018-04-24 10:37.