#! /usr/bin/env perl
use strict;
use warnings;
use 5.010;

say length("ä");

my $ä = "test";

say $ä;