# New Ticket Created by Paweł Pabian
# Please include the string: [perl #116302]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=116302 >
There was socket behavior change between 2012.11 and 2012.12.
For example sending euro sign through sockets
perl6 -e 'my $listener = IO::Socket::INET.new( localhost => "", localport =>
8080, :listen ); while my $connection = $listener.accept( ) { $connection.send(
"\x[20ac]\r\n" ); $connection.close( ); }'
On 2012.11 works
perl6 -e 'my $client = IO::Socket::INET.new( host => "localhost", port => 8080
); my $inc = $client.get; say $inc.uc'
€
On 2012.12 breaks
perl6 -e 'my $client = IO::Socket::INET.new( host => "localhost", port => 8080
); my $inc = $client.get; say $inc.uc'
Invalid operation on binary string
in method uc at src/gen/CORE.setting:2206
in block at -e:1