#! /usr/bin/perl use strict; use warnings; my %replace = ( # Umlaute MUESSEN als utf8 eingegeben vorliegen "\N{LATIN SMALL LETTER A WITH DIAERESIS}" => 'ae', );