Skip to content

Instantly share code, notes, and snippets.

@fibo

fibo/utf8.pl

Created Nov 27, 2013
Embed
What would you like to do?
#!/usr/bin/env perl
#
# Answer to http://mortoray.com/2013/11/27/the-string-type-is-broken/
#
use strict;
use warnings;
use utf8;
use v5.18;
binmode(STDOUT, ":utf8");
my $text = 'noël';
say length $text;
my $txet = reverse $text;
say $txet;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment