Hallo Gerd und danke für den Tipp - das war ne riesige Hilfe!
Ich habe die Stelle mal etwas modifiziert, um die Prüfung nicht auszuhebeln, dieses komische DATEV-E-Mail-Format 7dd4de92-e632-4dcc-976a-0386b9c8e3ad@uploadmail.datev.de
jedoch auch zu ermöglichen - falls es irgendwem hilft:
# check valid mail adresses foreach (qw(email_sender_sales_quotation email_sender_request_quotation email_sender_sales_order
email_sender_purchase_order email_sender_sales_delivery_order email_sender_purchase_delivery_order
email_sender_invoice email_sender_purchase_invoice email_sender_letter email_sender_dunning
global_bcc)) {
next unless $defaults->{$_};
my $email_regex = qr/^[a-z0-9._%+-]+@[a-z0-9.-]+\.[a-z]{2,}$/i;
my $relaxed_email_regex = qr/^[a-z0-9._%+-]+@[a-z0-9.-]+$/i;
next if $defaults->{$_} =~ $email_regex || $defaults->{$_} =~ $relaxed_email_regex;
push @errors, t8('The email entry for #1 looks invalid', $_); }