Perl

Clear the SMTP Session Log

Demonstrates the Chilkat MailMan.ClearSmtpSessionLog method, which clears the current contents of the SmtpSessionLog property. This example opens an SMTP connection (which populates the log) and then clears it.

Background: Like its POP3 counterpart, the SmtpSessionLog records the raw client/server dialog — the EHLO, AUTH, MAIL FROM, RCPT TO, and DATA exchanges — which is the first thing to inspect when a send fails. Clearing it between sends keeps the captured log focused on the operation you care about rather than the entire history of a reused MailMan object.

Chilkat Perl Downloads

Download Chilkat for Perl

Perl

use chilkat();

$success = 0;

#  Demonstrates the MailMan.ClearSmtpSessionLog method, which clears the current contents of
#  the SmtpSessionLog property.

$mailman = chilkat::CkMailMan->new();

#  Configure the SMTP server connection.
$mailman->put_SmtpHost("smtp.example.com");
$mailman->put_SmtpPort(465);
$mailman->put_SmtpSsl(1);
$mailman->put_SmtpUsername('user@example.com');
$mailman->put_SmtpPassword("myPassword");

#  Perform an SMTP operation, which populates the session log.

$success = $mailman->OpenSmtpConnection();
if ($success == 0) {
    print $mailman->lastErrorText() . "\r\n";
    exit;
}

#  Clear the SMTP session log (for example, before the next operation).
$mailman->ClearSmtpSessionLog();

$success = $mailman->CloseSmtpConnection();
if ($success == 0) {
    print $mailman->lastErrorText() . "\r\n";
    exit;
}

print "SMTP session log cleared." . "\r\n";