Perl6 Supply which takes a supply of bytes as input and returns a supply of unicode characters
Perl6 Perl
Switch branches/tags
Nothing to show
Latest commit be59958 May 2, 2017 @krunen META.json -> META6.json
Failed to load latest commit information.
t initial commit Dec 6, 2015
.travis.yml initial commit Dec 6, 2015


Rakudo's built-in UTF8 parser will wait for a possible combining character before getc() returns. Using this module, you can read bytes from $*IN and use this module to get unicode characters

use Unicode::UTF8-Parser;

my $stdin = supply { while (my $b = $*[0]).defined { emit($b) } };
my $utf8 = parse-utf8-bytes($stdin);

$utf8.tap({ say "got $_" });

The module exports the sub parse-utf8-bytes, which take a supply as input and returns a new supply.

If there are Non-UTF8 bytes in the stream, they will be emitted as Int. You have to implement handling of these yourself ($val ~~ Int).