my $test = 'hällö'; my %map = ( chr(228) => 'ae', chr(246) => 'oe', chr(223) => 'ss', ); $test =~ s!([äöß])!$map{$1}!g; print $test;