#! /usr/bin/env perl use strict; use warnings; use utf8; use 5.14.0; binmode(STDOUT, ':utf8'); my $str = 'Wölle'; say "Original: $str"; $str =~ s/[éè]/e/g; say "after s/e/e/: $str"; $str =~ s/[öÖ]/oe/g; say "after s/ö/oe/: $str";