#!/usr/bin/perl
use 5.010;
use strict;
use warnings;
use utf8;
use Encode qw( encode );


my $string = 'abcäöüß';

my @match = $string =~ /(\w)/g;

say encode( 'utf-8', "@match" ); # a b c ä ö ü ß