$address{Bernd} = 'Bernd Dulfer|Kapellenstr. 1|bdulfer@sybase.com'; $email = (split(/\|/, $address{bernd}))[2];