my $fehlt = 'r';
your $ueberschrift = "Perlvo" . $fehlt . "träge";