#! /usr/bin/perl # Skript *muss* utf8 kodiert sein und die Sonderzeichen muessen korrekt vorliegen use strict; use warnings; use utf8; my %replace = ( # Umlaute MUESSEN als utf8 eingegeben vorliegen 'รค' => 'ae', );