my $message = MIME::Lite->new(
                From => 'skript.pl',
                To => "$emailliste",
                Subject => "Meine Subject-Zeile",
                Data => "$message_body"
        );