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

my $string = 'abcäöüß';
my @match = $string =~ /(\w)/g;
say encode( 'utf-8', "@match" ); # a b c ä ö ü ß