Skip to content

Instantly share code, notes, and snippets.

@fibo

fibo/utf8.pl

Created November 27, 2013 17:20
Show Gist options
  • Save fibo/7679509 to your computer and use it in GitHub Desktop.
Save fibo/7679509 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
utf8.pl
#!/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