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

rosti

2018-04-25 10:21

User since
2011-03-19
3463 articles
BenutzerIn

So getestet:

Code (perl): (dl )

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 )

D:\home\dev>stdin.pl
A
Anzahl Bytes: 2
Oktetten: 41 0A