sendmail smtp protocol output

[legeti]

Hallo zusammen,
ich möchte den smtp output von sendmail bekommen?

in einem Perlskript verwende ich sendmail.

$msg->send('sendmail','/usr/sbin/sendmail' );

wenn ich das direkt über ein smpt Sever mache:

$msg->send('smtp','smtp-...com', Debug=>1 );

bekomme ich diesen Output:

MIME::Lite::SMTP=GLOB(0x40316700)>>> X0+aQeiG9PV/iiJUJDFFgtGTUAoPQEkQlMYkpQCRHCD5evPN6wXpVKfrmOQQ
MIME::Lite::SMTP=GLOB(0x40316700)>>> +29BYT2AJJGimk6aD3vQaA/lk+LRHqSE1L6g2JeXxFrJ9SfzN7y+j+mk90nD
MIME::Lite::SMTP=GLOB(0x40316700)>>> /Zcb+59+uP819/834P7n/v+8/+UP93/M/f8NuP//d/8zxhhjjDHGGGOMMcYY
MIME::Lite::SMTP=GLOB(0x40316700)>>> Y4wxxv6OJ6vNlY0AKAAA
MIME::Lite::SMTP=GLOB(0x40316700)>>>
MIME::Lite::SMTP=GLOB(0x40316700)>>> --_----------=_1168608533190280--
MIME::Lite::SMTP=GLOB(0x40316700)>>> .
MIME::Lite::SMTP=GLOB(0x40316700)<<< 250 Ok: queued as C934C34007
MIME::Lite::SMTP=GLOB(0x40316700)>>> QUIT
MIME::Lite::SMTP=GLOB(0x40316700)<<< 221 Bye

Gibt es eine Möglichkeit so einen Output auch von Sendmail zubekommen? Ich denke mal mit einem Parameter? oder? Ich muss nämlich sicher gehen, dass die Mail per SMTP verschickt wurde. Meine Idee war es nach

250 Ok: queued as

zu grepen (REGEX).

Oder gibt es eine weiteremöglichkeit


Bin euch wie immer sehr dankbar für eure Unterstützung.