Skip to content

Instantly share code, notes, and snippets.

@autarch

autarch/gist:08c754e76d9126717bec

Created June 16, 2014 20:03
Show Gist options
  • Save autarch/08c754e76d9126717bec to your computer and use it in GitHub Desktop.
Save autarch/08c754e76d9126717bec to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.pl
use v5.14;
use strict;
use warnings;
use utf8;
use Encode qw( encode is_utf8 );
my $bytes = join q{}, map { chr($_) } 240, 159, 152, 184;
say $bytes;
my $maybe_utf8 = "$bytes\n";
say is_utf8($maybe_utf8) ? 'yes' : 'no';
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment