Better supply a code sample:

    use Encode qw();
    use Encode::Escape qw();
    decode('Latin1', decode('unicode-escape', 'Walther-Straub-Institut
+ f\x{fc}r Pharmakologie und Toxikologie, Ludwig Maximillians-Universi
+t\x{e4}t M\x{fc}nchen, Germany'))
    # returns a Perl string
[download]